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图 灵 社 区 的 电子 书 没有 采用 专 有 客 
户 痕 ， 您 可 以 在 任意 设备 上 ， 用 目 
己 喜 欢 的 浏览 器 和 和 PDF 阅读 器 进行 
iE. 


但 您 购买 的 电子 书 仅 供 您 个 人 使 
用 ， 未 经 授权 ， 不 得 进行 传播 。 
我 们 愿意 相信 读者 具有 这 样 的 民 知 
和 觉悟 ， 与 我 们 共同 保护 知识 产 
权 。 


如 果 购 买 者 有 侵权 行为 ， 我 们 可 能 
对 该 用 户 实 施 包括 但 不 限于 关闭 该 
帐号 等 维权 措施 ， 并 可 能 退 究 法 律 
vit. 





Debasish Ghosh AnshinsoftZ 9] 
( http://www.anshinsoft.com ) 首席 技术 布 
道 师 ， 开 发 者 推荐 博客 “Ruminations of a 
Programmer” 的 作者 ，ACM 协 会 高 级 会 
员 。 他 拥有 跨国 IT 企业 20 余 年 工作 经 验 ， 擅 
长 为 各 种 客户 ( 无 论 是 中 小 型 公司 还 是 财富 
500 强 企业 ) 交付 企业 级 解决 方案 ， 对 自己 
将 软件 设计 和 编程 最 佳 实践 制度 化 而 引 以 为 
fi, $$zbJava, Ruby, Scala, OOR ER Zr 
式 编程 ， 关 注 DSL 和 NoSQL 数 据 库 。 电 子 邮 
fF: dghosh@acm.org。Twitter 账 号 : 
@debasishg。 





郭 晓 刚 大 学 持 业 ， 有 过 两 次 创业 和 创业 失 
败 的 经 验 ， 从 嵌入 式 硬件 到 企业 软件 开发 皆 
无 所 成 。 作 为 爱好 的 翻译 反倒 坚持 不 轻 ， 积 
攒 了 五 六 本 独 译 、 合 译 的 作品 。 长 期 在 InfoQ 
中 文 站 从 事 编辑 工作 ， 顺 带 磨 练 了 技术 触觉 
和 翻译 、 写 作 的 技艺 。 现 在 家 照顾 本 书 拖 稿 
期 间 出 生 的 儿子 。 
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内 容 提 要 


DSL (领域 专用 语言 ) 的 要 则 在 于 沟通 。 精 心 设计 的 DSL 可 以 以 一 种 从 外 观 到 内 在 都 极为 自然 的 方式 ， 
传达 出 其 所 表示 领域 的 本 质 和 真意 ， 帮 助 消除 业务 与 技术 的 隔 辆 ， 促 进项 目 和 干系 人 与 程序 员 的 沟通 。 

《领域 专用 语言 实战 》 不 仅 介 绍 如 何 使 用 DSL 解决 问题 ， 还 会 使 用 Ruby、Groovy、Scala、Clojure 等 
现代 语言 阐述 DSL 的 设计 与 实现 ， 针 对 这 些 语言 所 代表 的 不 同 编程 范式 深入 讨论 其 在 DSL 设计 上 的 优 劣 。 
本 书 共 分 三 部 分 。 第 一 部 分 定位 DSL 驱动 开发 环境 ， 寻 找 其 在 应 用 程序 架构 中 的 用 武之 地 ， 帮 助 程序 员 或 
架构 师 了 解 如 何 调整 现 有 开发 工具 和 技术 ， 使 之 适应 DSL 驱动 的 新 范式 。 第 二 部 分 带 你 设计 优秀 的 语义 模 
型 ， 使 之 成 为 上 层 语言 抽象 的 有 力 后 盾 。 该 部 分 主要 指导 开发 人 员 按照 优秀 抽象 的 设计 原则 搭建 领域 模型 ， 
HikKAZEUPE I DSL 实现 技术 ， 如 元 编程 、 解 析 器 组 合子 ， 以 及 ANTLR、Xtext 等 开发 框架 。 第 三 部 分 主 
要 展望 未 来 趋势 ， 重 点 讨论 解析 器 组 合子 和 DSL 工作 台 技 术 的 发 展 前 景 。 

本 书 适 合 开 发 人 员 、 架 构 师 、 领 域 用 户 学 习 参 考 。 
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献 给 我 的 祖父 ， 是 他 教会 了 我 第 一 个 字母 。 
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JEÁARELDXGESUÍWVESR, RAER FI EAGER, JGIOCALHPXYSNESUIE—TUESS. 编程 
语言 ， 尤 其 是 DSL (Domain Specific Language， 领 域 专用 语言 )， 能 激 起 我 极 大 的 热情 。 

DSL 这 一 概念 并 不 是 最 近 才 发 明 的 ，Lisp 开 发 者 们 早 就 在 开发 和 使 用 所 谓 的 “小 语言 ”了 。 
不 过 近年 来 ，DSL 确 实在 整个 行业 范围 内 被 更 广泛 地 使 用 和 接受 ， 相 关 工 具 和 技术 也 日 渐 成 熟 。 
如 果 开 发 者 想 探索 语言 设计 这 一 精彩 世界 ， 可 以 说 现在 的 条 件 是 前 所 未 有 的 。 

如 同 大 多 数 语 言 ，DSL 的 要 旨 在 于 沟通 。 精 心 设计 的 DSL 可 以 以 一 种 从 外 观 到 内 在 都 极为 目 
然 的 方式 ,传达 出 其 所 表示 领域 的 本 质 和 真意 。DSL 能 帮助 消除 业务 与 拉 术 的 阳 闵 ,促进 项 目 干 
系 人 与 程序 员 的 沟通 。 这 种 能 力 比 以 往 任 何 时 候 都 更 重要 ， 更 值得 我 们 去 追求 。 

Debasish 在 Scala 和 开源 社区 里 都 是 受 人 得 租 的 专家 。 他 的 博客 既 给 人 以 学 识 上 的 局 发 ， 又 元 
满 阅 谈 乐趣， 多 年 来 我 一 直 在 关注 。Debasish 一 年 前 开始 为 Akka 项 目 贡 献 力 量 ， 我 这 个 长 年 的 庶 
者 因而 与 他 有 了 进一步 的 接触 。 往 来 言行 一 下 子 就 表露 出 来 ， 他 不 仅 是 一 位 次 刻 的 思考 者 ， 还 是 
一 位 有 行动 力 的 实干 家 。 从 那 以 后 ， 与 他 讨论 编程 语言 、 设 计 成 了 我 乐 在 其 中 的 爱好 。 

这 是 一 本 令 人 激动 的 书 。 书 中 内 容 的 泣 盖 面 很 广 ， 而 在 此 基础 上 又 有 相当 的 深度 , BER Y a e 
谈 者 穿梭 于 DSL 发 展 的 最 前 沿 ， 它 还 将 市 领 大 家 思考 如 何 设计 有 灵活 而 目 然 的 DSL。 此 外 ， 旋 者 还 
将 领略 Scala 、Groovy 、Clojure 、Ruby 等 各 具 特 色 的 语言 ， 掌 握 每 一 种 语言 解决 问题 的 思路 和 手 
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2001 年 春天 ， 我 供职 的 Anshinsoft 公 司 ( http://www.anshinsoft.com ) 开始 涉足 企业 应 用 开发 
业务 ,客户 是 一 家 在 亚太 区 数一数二 的 证 养 中 介 和 资产 管理 企业 。 这 段 经 历 激 起 了 我 对 一 个 专门 
的 问题 领域 进行 建 棋 ， 然 后 将 模型 转换 成 软件 的 兴趣 。 于 是 我 开始 了 一 段 考验 角力 的 学 习 旅 程 ， 
仔细 参 详 了 Eric Evans 的 领域 驱动 设计 著作 (Domain-Driven Design: Tackling Complexity in the 
Heart of Software" ), W T Josh Bloch 关 于 如 何 设计 优秀 API 的 教诲 ( How to Design a Good API & 
Why it Matters, http://www.infoq.com/presentations/effective-api-design ) 以 及 Martin Fowler 关 于 DSL 
的 教义 。 

精心 设计 的 DSL 旨 在 问 目 标 用 户 提 供 人 性 化 的 界面 , 而 做 到 这 一 点 的 最 佳 途径 是 让 编程 模型 
使 用 领域 专用 语言 来 “说 话 ”。 我 们 一 下 以 来 总 是 把 程序 设计 得 像 个 “ 黑 盒 ”， 很 少 让 业务 人 员 得 
知 其 内 部 细 方 ， 这 种 做 法 可 以 休 人 笑 。 经 验 告诉 我 ,所 有 用 户 都 希望 查看 一 下 你 建 模 在 代码 里 的 业 
务 规则 ， 而 不 是 日 板 上 杂乱 的 框框 和 第 头 。 

舰 在 代码 里 的 规则 要 容易 被 用 户 理解 , 用 户 必 须 能 看 懂 你 使 用 的 语言 , 这 就 是 我 从 事 十 年 领 
域 建 模 的 领悟 。 当 规则 可 被 理解 的 时 候 ，DSL 也 就 呼之欲出 了 。 随 之 得 到 改善 的 不 仅 有 开发 团队 
和 业务 人 员 的 沟通 效率 ， 还 有 软件 面 癌 用 户 的 表达 能 力 。 

对 于 我 们 能 否 为 用 户 提 供 表现 力 充 沛 的 语法 和 语义 , 实现 语言 无 论 何 时 都 是 一 个 决定 性 的 
素 。 有 赖 于 当今 生态 环境 的 巨大 发 展 , 我 们 所 设计 的 语言 得 以 在 表现 力 上 有 了 长 足 进步 。 以 廊 励 
开发 者 编写 精炼 而 定 有 表现 力 的 代码 而 论 ，Ruby、Groovy、Scala 和 Clojure 是 先行 的 表率 。 在 这 
几 种 语言 下 的 第 一 手 编程 经 验 让 我 感觉 到 , 它们 的 语言 风格 和 表达 习惯 远 比 大 多 数 前 代 语 言 更 适 
合 领 域 建 模 。 

写 这 样 一 本 关于 DSL 的 书 是 很 大 的 挑战 。 我 试图 关注 DSL 的 一 切 现 实事 物 ， 所 以 从 一 开始 就 
设 定 了 具体 的 领域 。 当 我 们 渐次 展开 论述 , 领域 模型 随 春 各 种 业务 需求 的 昧 加 而 变 得 越 来 越 复杂 。 
这 正好 充分 体现 了 DSL 驱 动 的 开发 方式 对 问题 域 复杂 度 增 长 的 适应 能 力 。DSL 方 式 并 不 是 对 API 
KIWA, 它 只 是 发 励 你 在 API 的 设计 思路 上 多 考虑 一 个 维度 。 请 务必 记 住 , 你 的 用 户 才 是 DSL 
的 使 用 者 。 凡 事 多 从 用 户 的 角度 去 考虑 ， 你 一 定 会 成 功 的 | 
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天 于 本 书 


每 一 次 我 们 在 晶 板 上 设计 领域 模型 ,似乎 总 会 在 落实 到 代码 的 时 候 于 纷 杂 中 走 了 样 。 实现 模 
型 不 管用 哪 种 编程 语言 来 表述 , 它 都 已 经 不 是 领域 专家 能 理解 的 业务 语言 形式 。 白板 上 的 模型 是 
否 精确 反映 了 我 们 与 领域 用 户 商 定 的 需求 规格 ， 这 也 无 从 让 和 擎 握 领域 规则 的 人 员 去 验证 。 

对 于 这 个 症结 ,本 书 给 出 的 解决 之 道 是 采用 一 种 以 DSL 驱 动 的 应 用 程序 开发 模型 。 假 如 我 们 
围绕 领域 用 户 能 够 理解 的 语法 和 语义 设计 领域 API， 那 么 即使 在 应 用 程序 代码 的 开发 过 程 里 ， 用 
户 也 能 随时 检查 领域 规则 实现 得 是 否 正 确 。 采 用 领域 语言 的 代码 更 容易 让 人 看 做， 在 这 一 点 上 ， 
开发 人 员 、 维 护 人 员 、 只 收 业 务 不 惟 编 程 的 领域 专家 都 是 受益 者 。 

本 书 除了 教 你 使 用 DSL 来 解决 问题 ， 还 会 教 你 实现 DSL。 在 本 书 看 来 ，DSL 只 是 在 语义 模型 
外 面包 天 上 清 注 一 层 以 语言 形态 呈现 的 抽象 ,语义 模型 是 把 握 领域 核心 结构 的 实现 载体 , HIE 
则 使 用 领域 用 户 的 专门 用 语 。 

本 书 将 使 用 Ruby、Groovy、Scala、Clojure 等 现代 语言 来 讲授 DSL 的 设计 与 实现 ， 针 对 这 些 
语言 所 代表 的 不 同 编程 范式 深入 讨论 它们 在 DSL 设 计 上 的 长 处 和 短处 。 读 完 本 书 , 你 将 透彻 理解 
一 些 必须 掌握 的 概念 ， 能 够 设计 出 用 户 理 解 且 欣 党 的 优美 的 领域 抽象 。 


污 者 对 象 


如 果 你 和 希望 日 己 设计 的 API 其 表现 力 既 满足 领域 用 户 的 需要 ， 又 能 达到 程序 员 同 行 的 要 求 ， 
那么 这 本 书 恰好 适合 你 。 如 果 你 是 一 名 领域 用 户 ， 正 期 每 着 改善 与 开发 团队 的 沟通 效果 ， 那么 这 
本 书 恰 好 适合 你 。 如 果 你 是 一 名 程序 员 , 正 为 如 何 与 领域 用 户 核 对 业务 规则 的 实现 正确 与 否 而 百 
恼 ， 那 么 这 本 书 同样 适合 你 。 













































































本 书 内 容 

图 1、 图 2、 几 3 除了 勾画 出 了 全 书 的 组 织 脉络 ， 对 各 草 的 内 容 也 作 了 简略 的 前 述 。 本 书 分 为 
三 部 分 ， 

Q 使 用 DSL; 

a DSL; 








DDSL 开 发 的 未 来 趋势 。 


关于 本 书 












我 们 都 想 
学 习 DSL 
FA 。DSL 入 门 介绍 
。DSL 的 分 类 
。DSL 在 领域 建 模 中 的 作用 
e DSL 驱 动 开发 的 优点 和 缺点 





用 Java 和 Groovy 
实现 我 们 的 首 个 
DSL 





e 上 Java 实现 的 一 个 DSL 现 实例 子 

。 Groovy 语 言 表现 力 更 强 ， 更 适用 于 实现 DSL 
e 用 Groovy 重 写 之 前 的 Java DSL 

。DSL 实 现 的 一 般 模 式 







怎样 将 DSL 集 成 
到 核心 应 用 程序 


e 将 DSL 集 成 到 核心 应 用 程序 
。 一 般 的 集成 模式 
e DSL 中 的 异 间 处 理 


Kl 第 1 章 到 第 3 章 的 学 习 历 程 








可 以 学 点 DSL 


设计 模式 吗 ? e 实现 内 部 DSL 


N e 模式 、 惯 用 法 和 最 佳 实践 
PIEL e 分 别 用 Ruby、Groovy、Clojure、 
Scala 来 实现 内 部 DSL 





e 完整 的 内 部 DSL 实 现 演练 
e 动态 OO 语言 Ruby 和 Groovy 
e 动态 函数 式 语 言 一 一 Clojure 








e 用 Scala 实 现 内 部 DSL 

。 议 态 类 型 对 DSL 的 表现 力 和 
简洁 度 有 何 影 响 

e Scala 兼 具 强 大 的 OO 和 函数 
式 语言 特性 


Ko ”第 4 章 到 第 6 章 的 学 习 历 程 
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外 部 DSL 要 学 些 什 么 ? 

e。 训 析 外 部 DSL 

第 7 。 语 法 分 析 器 在 外 部 DSL 设 计 中 的 作用 
= 。 用 ANTLR 设 计 DSL 

T e 作为 外 部 DSL 设 计 平 台 的 Xtext 





能 讲 讲 具 体 的 外 部 
DSL 设 计 技术 吗 ? 









。 用 解析 器 组 合子 来 设计 外 部 DSL 
e 解析 颖 组 合子 一 一 是 什么 ， 为 什么 ， 怎么 做 
。 用 Scala 解 析 器 组 合子 来 实现 DSL 












DSL 未 来 会 
是 什么 样子 ? 





e 基于 DSL 的 开发 的 未 来 趋势 
ss 一 。DSL 丰 富 的 相关 工具 支持 
。 分 析 器 组 合子 等 函数 式 特性 获得 更 多 用 武之 地 


图 3 ”第 7 章 到 第 9 草 的 学 习 历 程 

















第 一 部 分 (第 1 章 ~ 第 3 章 ) 作为 总 括 ， 详 细 地 阐述 了 DSL 驱 动 开发 环境 的 定位 ， 帮 助 读 者 在 
目 己 的 应 用 程序 染 构 中 找到 它 的 用 武之 地 。 如 果 你 是 程序 员 或 者 染 构 师 , 这 部 分 内 容 将 协助 你 调 
整 现 有 的 开发 工具 和 技术 ,使 之 适应 DSL 了 驱动 的 新 式 。 本 书 主 要 围绕 各 种 JVM ( Java 虚拟 机 ) 
语言 展开 论述 。 因 此 ，Java 程 序 员 很 快 就 能 够 从 书 中 找到 适合 目 壬 项目 情况 的 DSL 运 用 方式 ,在 
目 己 的 Java 项 目 内 集成 用 表现 力 更 佳 的 其 他 JVM 语 言 开 发 出 来 的 DSL。 

DSL 拥 有 各 种 贴近 用 户 思 维 的 语法 结构 ， 这 些 语言 抽象 有 赖 于 语义 模型 在 背后 提供 支撑 。 第 
二 部 分 (第 4 章 ~ 第 8 章 ) 探讨 如 何 设计 出 优秀 的 语义 模型 ， 使 之 成 为 上 层 语言 抽象 的 有 力 后 盾 。 
这 个 部 分 主要 是 给 开发 人 员 准 备 的 ， 骨 在 指导 开发 人 员 按 照 优秀 抽象 的 设计 原则 来 搭建 领域 模 
型 。 从 第 4 章 到 第 8 革 ， 各 草 都 含有 让 宦 的 DSL 代 人 码 片 段 ， 实 现 语 言 包括 Ruby、Groovy、Clojure、 
Scala 等 。 如 果 正 在 或 即将 使 用 这 些 语言 来 实现 DSL, 那么 你 会 发 现 这 几 章 的 内 容 特别 实用 。 书 中 
讲解 了 DSL 的 实现 手法 ,而 且 将 从 最 基本 的 技术 入 手 ， 了 逐渐 深入 到 高 级 技术 ， 如 元 编程 、 解 析 唤 
组 合子 ， 以 及 ANTLR 、Xtext 等 开发 框架 。 

第 三 部 分 (第 9 章 ) 主要 展望 未 来 趋势 ， 重 点 讨论 解析 震 组 合子 和 DSL 工 作 人 台 技 术 未 来 的 
发 展 。 

本 书面 向 真正 的 实践 者 。 因 此 ， 虽 然 书 中 也 含有 理论 知识 , 但 只 是 作为 帮助 理解 具体 实现 的 
铺垫 而 存在 。 我 发 自 内 心地 相信 这 将 是 一 本 让 奋战 在 开发 第 一 线 的 实干 家 感 党 有 用 的 书 。 





















































4 关于 本 书 


排版 约定 


本 书 正文 中 穿插 了 不 少 插 入 内 容 和 补充 内 容 ， 用 于 提醒 读者 注意 一 些 重要 信息 。 
一 般 来 说 ， 下 面 的 排版 样式 用 于 展示 与 证 券 交 易 及 结算 领域 有 关 的 信息 。 














le esito 
带 有 这 个 标志 ,， 即 表示 其 中 信息 与 DSL 所 属 领域 有 关 ,， 读 者 需要 了 解 其 中 知识 才能 理解 上 
下 文 。 此 类 内 容 一 般 是 对 一 些 特殊 术语 和 概念 的 背景 介绍 。 





书 中 还 有 市 为 一 种 标志 的 插入 内 容 ， 其 排版 格式 如 下 。 


E 此 类 插入 内 容 含 有 不 属于 所 在 章节 讨论 话题 的 知识 。 例 如 某 种 DSL 设 计 的 特殊 惯 
用 法 、 对 前 文 讨论 的 重点 归纳 ， 或 者 我 希望 强调 的 其 他 重要 知识 点 。 





为 外 ， 我 还 用 下 面 所 示 的 标志 来 引起 读者 对 特定 内 容 的 注意 。 


e 
E ”语言 相关 信息 

看 到 这 个 标志 , 你 就 应 该 知道 其 中 含有 当前 示例 所 用 编程 语言 的 小 知识 。 你 需要 掌握 这 些 
特定 的 概念 才能 真正 理解 当前 示例 。 











在 这 里 , 我 提请 大 家 注意 不 要 轻易 忽略 这 些 带 有 不 同 标志 的 补充 信息 , 它们 都 是 可 以 帮助 你 
透彻 理解 当前 讨论 内 容 的 重要 参考 知识 。 


代码 约定 和 下 载 


本 书包 含 大 量 的 DSL 示 例 ， 其 中 不 少 例子 的 完成 度 很 高 ， 足 以 完整 解释 某 一 方面 的 领域 规则 
实现 。 这 些 例子 使 用 的 编程 语言 有 Java、Ruby、Groovy、Scala 和 Clojure。 代码 清单 和 正文 中 插入 
的 代码 片段 都 使 用 等 宽 字 体 ， 便 于 读者 把 它们 和 一 般 的 文字 区 分 开 来 。 正 文中 出 现 的 方法 名 、 参 
数 、 对 象 属 性 、ANTLR 和 Xtext 等 脚本 、XML 元 素 和 属性 也 都 一 律 使 用 等 宽 字 体 呈 现 。 

示例 代码 不 一 定 总 是 短小 的 片段 , 有 时 候 为 了 充分 说 明 所 涉 领域 的 上 下 文 和 语义 , 也 会 占用 
较 长 的 篇 幅 ,， 保 留 较 多 的 细节 。 书 中 的 代 但 经 稼 会 为 了 适应 书本 的 页 面 宽 度 ， 而 在 断 行 和 缩 进 上 
做 一 些 格式 调整 ; 偶尔 还 有 调整 不 过 来 的 情况 , 这 时 对 于 那些 不 得 不 折 行 的 代码 , 我 们 会 在 折 行 
的 位 置 打上 一 个 续 行 标记 。 

很 多 代码 清单 中 会 穿插 一 些 标注 ， 以 便 回 谈 者 提示 重点 。 有 时 候 标 注 还 会 市 有 数字 编号 , 方 
便 我 们 在 后 续 的 介绍 中 引用 和 参照 。 

书 中 用 了 多 种 编程 语言 来 实现 DSL， 显 然 不 可 能 所 有 的 读者 都 熟悉 其 中 所 用 的 每 一 种 语言 。 
因此 作为 快速 的 参考 ， 书 后 准备 了 每 种 语言 的 速 查 表 格 ， 见 附录 C 到 附录 G。 附 录 中 的 介绍 只 是 
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针对 书 中 探讨 DSL 实 现 所 用 到 的 一 些 关 键 声言 特性 展开 ， 并 不 完整 全 面 ， 进 一 步 的 知识 需要 该 者 
到 表格 后 补充 的 参考 资料 中 去 寻找 。 

大 多 数 时 新 的 IDE 都 有 能 力 文 持 开发 者 在 同一 项 目 中 使 用 多 种 语言 。 如 果 读 者 不 熟悉 多 语言 
开发 环境 ， 附 录 G 是 一 个 催 单 的 人 门 指导 。 

书 中 所 有 示例 的 源 代码 都 可 以 从 Manning 出 版 社 网 站 下 载 *"， 地 址 为 http:/www.manning. 
com/DSLsinAction， 配 置 构建 环境 和 执行 环境 的 相关 指示 也 包含 在 内 。 阅 读 的 时 候 在 手边 备 一 份 
源 代 码 ， 这 会 对 你 很 有 帮助 。 


作者 在 线 


本 书 有 一 个 由 Manning 出 版 社 运 党 的 关联 网 络 论 坛 ， 购 买 本 书 的 读者 具有 今 费 访问 论坛 的 权 
利 。 读 者 可 以 在 上 面 发 表 评 论 、 询 问 技术 问题 ， 并 获得 作者 和 其 他 用 户 的 帮助 。 注 册 及 使 用 论坛 
请 访问 http://www.manning.conVDSLsinAction。 读 者 可 从 该 页 面 了 解 论坛 的 注册 和 使 用 方法 、 论 
坛 内 提供 的 帮助 、 论 坛 守 则 等 信息 。 

Manning 出 版 社 回 谈 者 承 话 提 供 谈 者 之 间 、 谈 者 与 作者 之 间 展 开 有 意义 对 话 的 便利 场所 。 作 
者 只 是 志愿 ( 且 无 偿 ) 地 参与 论坛 活动 ， 因 此 Manning 出 版 社 不 对 作者 参与 论坛 的 程度 做 要 求 。 
我 们 建议 读者 尽量 提出 一 些 具 有 挑战 性 的 问题 ,让 作者 有 兴趣 持续 访问 本 论坛 ,在 书籍 在 版 期 间 ， 
出 版 社 网 站 将 保证 读者 可 以 访问 作者 在 线 交 流 论坛 及 论坛 上 积累 的 讨论 内 容 。 






























































CD 也 可 在 图 灵 社 区 本 书页 面 ( http:/www.ituring.com.cn/book/836 ) 免费 注册 下 载 。 一 一 编者 注 


大 于 封面 图 片 


本 书 封面 图 片 为 “来 自 克 罗 地 亚 斯 拉 沃 尼 亚 地 区 奥 西 耶 克 城 附近 的 久 尔 杰 瓦 次 村 的 男人 ”。 
这 幅 男 是 在 克罗地亚 历史 名 城 斯 普 利 特 的 民族 博物 馆 一 位 热心 馆 员 的 帮助 下 取得 的 ， 来 目 该 馆 
2003 年 重 版 的 一 本 19 世 纪 中 期 由 Nikola Arsenovic 编 扎 的 克罗地亚 传统 服饰 画集 。 斯 普 利 特 民 族 博 
物 馆 本 身 即 坐落 于 中 世纪 的 城市 中 心 ， 也 是 罗马 古迹 的 核心 所 在 一 一 建 于 公元 304 年 前 后 的 罗马 
帝国 宫殿 戴 克 里 先 宫 遗址 上。 画集 内 收录 了 克罗地亚 各 地 区 人 物 形 象 的 精细 彩绘 图 样 , 并 配 有 对 
服饰 和 生活 习俗 的 文字 说 明 。 

久 尔 杰 瓦 次 村 位 于 奥 西 耶 克 城 附 近 , 属于 克罗地亚 东部 历史 修 久 的 斯 拉 沃 尼 亚 地 区 。 斯 拉 沃 
尼 亚 的 男人 们 传统 上 穿戴 红色 的 帽子 、 白 色 衬 衣 、 带 刺绣 图 案 的 蓝 色 马甲 和 长 裤 , 然后 点 级 上 毛 
织 或 皮 单 的 宽 腰 融和 厚 毛 袜 ， 最 后 章 一 件 标 色 羊 皮 的 短 外 套 ， 也 就 是 本 书 封面 上 的 样子 。 

人 们 的 衣着 式样 和 生活 习俗 在 最 近 的 200 年 里 发 生 了 很 大 的 变化 。 从 前 各 地 丰富 多 彩 ， 极 有 具 
地 方 特色 的 衣着 和 习 众 已 经 消失 殖 尽 。 依 现在 的 情况 ,甚至 连 不 同济 的 居民 都 趋 于 同化 、 难 以 区 
分 了 ,相距 数 里 的 村 落 和 市 镇 之 间 ， 就 更 不 可 能 有 什么 差别 了 。 也 许 , 我 们 已 经 牺牲 了 文化 的 多 
样 性 来 换取 多 姿 多 彩 的 个 人 生活 一 一 五 光 十 色 的 、 快 节奏 的 科技 生活 。 

Manning 出 版 社 特意 从 旧书 和 藏品 里 找 回 这 些 古 老 图 样 ， 让 两 个 世纪 以 前 丰富 多 彩 的 地 方 生 
活 特 色 在 图 书 封面 上 重 焕 光 彩 ， 以 此 来 表达 对 计算 机 行业 的 创造 精神 和 主动 精神 的 赞美 。 
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领域 专用 语言 入 门 





什么 是 领域 专用 语言 (DSL) ? DSL 对 于 应 用 程序 开发 者 有 何 价值 ? DSL 能 给 使 用 软件 
的 行业 用 户 带 来 哪些 好 处 ? DSL 驱动 开发 是 否 有 助 于 开发 团队 与 领域 专家 团队 之 间 的 交流 ? 
DSL AFRA MAE? 这 些 问题 都 可 以 在 第 一 部 分 找到 答案 。 

这 一 部 分 由 第 1 草 ~ 第 3 章 组 成 ， 将 介绍 多 种 被 广泛 使 用 的 DSL 和 设计 DSL 的 一 般 原则 ， 
以 便 你 在 自己 动手 设计 DSL 时 知道 应 该 注意 什么 。 

第 1 章 照例 是 对 DSL 的 入 门 介绍 。 

第 2 章 将 带 你 一 起 设计 第 一 个 DSL。 随 着 设计 的 推进 ， 你 将 体会 到 用 户 需求 一 步 步 地 演变 
成 富 于 表现 力 的 DSL。 我 们 首先 用 Java 来 实现 DSL， 然 后 换 成 JVM 上 的 另 一 种 语言 Groovy, 
届时 你 将 看 到 语言 表现 力 的 提升 。 

第 3 章 介 绍 如 何 围绕 一 个 核心 应 用 程序 集成 内 部 与 外 部 DSL， 以 及 如 何 处 理 错误 和 异常 。 

这 一 部 分 面 同 程序 员 和 不 具备 编程 背景 的 领域 用 户 ， 因 此 特意 避 开 了 具体 的 实现 细节 ， 以 
便 读者 对 DSL 的 大 体 情境 有 一 个 全 面 的 了 解 。 








初 识 DSL 





本 章 内 容 

a 什么 是 DSL 

口 DSL 对 于 商业 用 户 和 解决 方案 的 开发 者 各 有 什么 好 处 
口 DSL 的 结构 

a 采用 设计 得 当 的 抽象 概念 


清晨 上 班 路 上 ， 你 通常 都 会 走 进 钟 爱 的 咖啡 店 点 一 杯 “ 大 杯 纤 体 肉 桂 带 奶油 拿 铁 "， 店 员 则 
会 准确 无 误 地 端 上 一 杯 用 脱脂 奶 和 无 糖 糖浆 调制 的 香甜 肉桂 口味 473 ml 拿 铁 咖啡 ， 上 浇 打 发 的 鲜 
奶油 。 因 为 你 点 单 用 的 是 她 能 理解 的 精确 语汇 ， 所 以 即使 没有 详细 解释 每 个 词 的 含义 ， 也 丝 怠 无 
但 于 交流 , 哪 介 不 相干 的 人 听 了 会 摸 不 看 头脑 。 本 草 将 要 介绍 的 就 是 如 何 用 特定 领域 的 语汇 来 表 
达 一 个 问题 ， 然 后 进一步 在 解答 域 对 问题 建 模 。 这 种 从 问题 域 映 射 到 解答 域 的 实现 模型 束 是 DSL 
( Domain-Specific Language， 领 域 专用 语言 ) 的 基本 思路 。 如 有 打 把 上 述 咖啡 店 里 的 情境 做 成 软件 ， 
那么 客人 们 每 天 点 单 折 用 的 语言 束 是 你 要 找 的 DSL。 

开发 者 设计 的 任何 应 用 程序 都 将 问题 域 映 射 成 解答 域 的 实现 模型 。DSL 是 映射 过 程 中 的 一 项 
重要 产物 和 组 成 部 分 。 在 更 确切 地 定义 DSL 之 前 ,我 们 首先 介绍 成 功 建立 映射 的 必要 过 程 。 要 使 
映射 成 立 ， 你 需要 先 找 出 两 个 领域 之 间 相 通 的 霹 汇 。 这 组 语汇 是 促成 DSL 最 终 诞 生 的 关键 种 子 。 




















设计 得 当 的 DSL 实 现 必定 不 能 缺少 一 套 好 的 抽象 。 某 些 读者 可 能 打算 继续 深究 息 

样 设计 出 良好 的 抽象 ， 因 此 我 们 在 附录 A 中 详细 探讨 了 设计 中 应 该 追求 的 一 些 特 
质 。 你 不 妨 现 在 就 翻阅 一 下 附录 A， 然 后 再 继续 看 本 章 接 下 来 的 内 容 。1.7 节 也 介绍 了 关 
于 抽象 的 基本 内 容 ， 但 附录 A 的 介绍 要 详细 得 多 。 


1.4 问题 域 与 解答 域 


领域 建 模 是 帮助 你 分 析 、 理 解 并 识别 茶 项 具体 活动 所 有 参与 方 的 活动 。 第 一 步 从 问题 域 人 手 ， 
确定 领域 中 的 实体 如 何 与 其 他 实体 进行 有 意义 的 互动 。 在 咖啡 店 的 例子 里 , 你 点 单 时 用 了 该 领域 
最 上 自然 的 语言 ,用 了 与 店员 的 知识 最 贴近 的 专门 用 语 。 术 请 构成 了 问题 域 的 核心 实体 。 咖 啡 店 店 
员 之 所 以 能 顺利 给 你 提供 相应 饮料 ， 正 是 因为 你 们 仙 都 玖 悉 必 要 的 专门 用 语 。 
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1.1.1 问题 域 


在 领域 建 模 活动 中 ， 问 题 域 指 构 成 你 所 分 析 业 务 的 那些 过 程 、 实 体 和 约束 条 件 。 领 域 建 模 ， 
也 称 领域 分 析 (参见 1.9 市 文献 [1] )， 就 是 要 识别 出 领域 中 所 有 的 重要 元 素 以 及 它们 之 间 的 协作 关 
系 。 在 前 面 的 例子 中 ， 店 员 和 车 握 了 构成 其 问题 瑾 的 所 有 实体 ， 如 咖啡 、 打 发 鲜 奶 油 、 肉 桂 、 脱 脂 
奶 等 。 如 果 要 分 析 一 个 更 复杂 的 领域 ， 比 如 金融 中 介 的 交易 结算 系统 ， 那 么 证 着 、 股 票 Wm. 
交易、 结算 承 是 其 中 的 一 些 元 素 。 除 了 这 些 ， 你 还 要 人 研究 证 券 如 何 发 行 、 在 交易 所 天 卖 、 在 各 区 
易 方 之 间 结 算 、 记 录 到 各 种 账册 和 户头 。 你 需要 先 确 认 这 些 协作 关系 ,然后 进行 分 析 并 把 结 来 作 
为 分 析 模 型 的 产物 记 入 文档 。 








1.1.2 REEL 


问题 域 的 分 析 模 型 是 用 解答 域 提 供 的 工具 和 手段 实现 出 来 的 。 你 只 要 点 单 , 店员 就 公 得 该 如 何 
制作 相应 咖啡 ,她 所 遵守 的 制作 过 程 以 及 使 用 的 工具 就 是 其 解答 域 的 构成 成 分 , 面 对 的 问题 域 越 大 ， 
你 可 能 就 越 需要 从 解答 域 寻求 更 多 工具 、 方 法 学 和 技术 手段 方面 的 文 持 。 问 题 瑾 的 元 素 需 要 映射 成 
解答 域 中 适当 的 技术 手段 。 如 琳 将 面 丫 对 和 象 方 法 作为 解答 域 的 基本 平台 , 那么 类 、 对 和 象 和 方法 就 是 
解答 域 的 基本 组 件 。 你 可 以 把 这 些 组 件 组 合成 大 一 点 的 组 件 , 而 后 者 可 能 正好 能 更 好 地 表示 问题 域 
更 高 一 层 的 元 系 。 图 1-1 描 绘 了 领域 建 模 的 第 一 步 。 如 何 从 间 题 域 出 发 ,运用 领域 专家 能 理解 的 技 














术 手 段 ， 完 成 向 解答 域 转 换 的 全 过 程 ” 随 着 学 习 的 不 断 推 进 ， 你 对 此 过 程 的 理解 会 未 渐 加 深 。 


问题 域 制品 





将 问题 域 映射 到 解答 域 
图 1-1 ”问题 域 的 实体 和 协作 关系 必须 映射 成 解答 域 中 相应 的 制品 。 图 中 左边 的 实体 
(证 券 、 交 易 、 结 算 等 ) 需要 在 右边 能 找到 对 应 的 表示 
领域 建 模 的 基本 实践 活动 就 是 把 问题 域 映 冉 到 解答 域 的 奢 干 制品 , 让 所 有 的 元 素 、 相 互 作用 和 
协作 关系 都 得 到 正确 而 合理 的 表示 。 为 此 , 你 首先 要 把 领域 对 象 按 合理 的 粒度 归 类 。 当 分 类 正确 时 ， 
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PRERESI TRAAT RUE SCRIBE TE T a He BIDG] WO, 不 过 , 映射 的 效 末 无 法 超越 作为 两 个 
领域 之 间 互 动 媒介 的 语言 的 表现 力 。 可 菲 的 互动 要 求 问 题 域 与 解答 域 分 译 一 全 共通 的 语汇 。 


1.2 ”领域 建 模 : 确立 共通 的 语汇 


要 开始 一 项 领域 建 模 活动 , 首先 要 从 等 得 被 建 模 的 问题 域 着 手 。 你 要 理解 域 中 实体 彼此 互动 
及 履行 各 目 职 责 的 方式 。 这 项 工作 要 在 领域 专家 和 建 模 人 员 的 协作 之 下 进行 。 领 域 专家 是 内 行 ， 
他 们 用 领域 内 的 专门 用 语 交流 ,而 且 癌 外 界 解释 领域 概念 的 时 候 也 离 不 开 这 套 专 门 用 语 。 建 模 者 
懂得 如 何 将 对 模型 的 理解 表达 成 一 种 可 被 编写 成 文档 、 分 至 并 实现 成 软件 的 形式 。 建 模 者 必须 能 
理解 领域 专家 的 术 二 ， 并 将 其 理解 反映 到 设计 的 领域 模型 中 去 。 

之 前 , 我 接手 过 一 个 对 一 家 大 型 金融 中 介 机 构 的 后 台 操 作 完 成 建 模 的 项 目 。 我 不 是 那个 领域 
的 专家 ,而 且 对 证 券 业 的 业务 活动 涉及 的 种 种 细节 和 复杂 情况 所 知 甚 少 。 经 过 与 领域 专家 一 段 时 
间 的 合作 , 我 感 党 这 个 领域 有 足够 的 代表 性 ， 其 例子 和 解释 足以 作为 该 者 对 其 他 领域 建 模 时 的 参 
考 。 接 下 来 的 补充 内 容 “ 金 融 中 介 系 统 : 背景 知识 ”介绍 了 证 券 交 易 和 金融 中 介 领 域 的 基本 情况 ， 
我 们 将 它 作 为 实例 来 介绍 如 何 实现 DSL。 随 痢 学 习 的 深入 ,你 将 发 现 一 些 新 的 概念 及 必要 的 庄 细 
内 容 。 如 琳 你 不 熟悉 股票 交易 也 无 知 担 心 , 我 会 用 补充 内 容 的 形式 提供 足够 的 背景 资料 ,帮助 你 
了 解 建 醒 对 象 的 基本 概念 。 

怠 在 需求 分 析 会 议 开 始 的 第 一 天 ， 人 金融 业 的 领域 专家 开始 大 谈 附 县 债券 、 折 价 债券 、 抵 押 、 
公司 行为 。 这 些 词 午 是 金融 中 介 的 秆 用 术语 ， 但 我 完全 不 知道 是 什么 意思 。 而 且 不 少 词 其 实 是 
同义词 ， 比 如 折价 债券 意思 等 同 零 县 债券, 不 同 的 领域 专家 会 在 不 同 场合 区 奉 使 用 它们 。 可 因为 
我 不 异 , 混 清 的 情况 层出不穷 。 在 场 的 不 可 能 部 是 金融 业 专 家 ,所 以 我 们 很 快意 识 到 必须 确定 一 
套 共 通 的 语汇 ,以免 知识 交流 会 议 失去 意义 。 不 仅 与 领域 专家 的 协作 要 在 共通 语汇 的 前 所 下 进行 ， 
而 且 我 们 要 确保 设计 开发 出 来 的 模型 基于 同一 种 “语言 ”一 一 这 个 领域 的 目 然 声言 。 




























































































D 金融 中 介 系统 ， ARAR 

金融 中 介 的 业务 始 自 一 次 交易 过 程 。 该 过 程 涉及 两 个 以 上 当事人 之 间 证 券 与 现金 的 交换 ， 
这 些 当事人 称 为 交易 方 。 在 某 个 确定 的 日 期 ( 称 为 交易 日 )， 交易 方 承诺 在 股票 交易 所 这 个 地 
点 ， 按 照 商定 的 价格 ( 称 为 单位 价格 ) 履行 交易 成 交 )。 交 萝 过 程 的 一 大 支柱 一 一 证 券 ( 另 
一 支柱 是 现金 ) 一 一 有 多 种 类 型 ， 如 股票 、 侦 券 、 共 同 基 金 等 ,许多 类 型 各 自 又 有 不 同 的 分 类 
人 体系。 比如， 债券 又 可 分 为 附 息 债券 和 折价 债券 。 

在 交易 日 之 后 规定 的 天 数 内 , 基金 或 证 券 的 所 有 权 在 交 萄 方 之 间 完 成 转移 , 这 称 为 结算 过 程 。 
每 种 证 券 都 有 各 自 的 交易 、 成 交 、 结 算 流程 ， 在 交易 和 结算 过 程 中 要 经 历 一 系列 的 状态 变更 。 


共通 语汇 的 益处 


共通 语汇 在 模型 的 所 有 关联 方 之 中 共享 , 作为 一 股 维系 力量 把 组 成 实现 的 各 部 分 制品 统一 起 
来 。 更 重要 的 是 ， 有 了 这 套 共通 语汇 ， 你 就 可 以 在 项 目 交 付 周 期 的 各 个 阶段 轻松 跟踪 各 项 特性 、 
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功能 和 对 和 象 的 变化 轨迹 。 建 模 者 用 来 编写 测试 用 例 的 名 词 术语 出 现在 程序 里 就 是 模块 的 名 字 , 出 
现在 数据 模型 里 就 是 实体 的 名 字 ， 出 现在 测试 用 例 里 就 是 对 象 的 名 字 。 以 这 样 的 方式 ， 共通 语汇 
成 为 了 架 通 问题 域 与 解答 域 的 桥梁 。 在 项 目前 期 , 建立 共通 语汇 花费 的 时 间 可 能 超过 预期 , 但 我 
几乎 可 以 担保 , 它 将 帮助 避免 更 多 未 来 返工 的 时 间 。, 我 们 来 看 看 共通 语汇 可 以 种 来 的 切实 的 好 处。 

1. 把 共通 语汇 当做 粘 合剂 

在 需求 分 析 阶 段 , 一 套 共通 语汇 可 充当 建 模 者 和 领域 专家 之 间 互 相 理 解 的 桥梁 , 可 使 讨论 更 
加 人 简明 扼要 、 效 率 更 高 。 当 交易 员 老 鲍 提 到 债券 的 应 计 利 息 时 ， 建 模 员 大 知道 他 说 的 债券 特 指 附 
Epi o 

2. 测试 用 例 中 的 共通 词汇 

共通 语汇 还 可 作为 开发 测试 用 例 的 基础 ,这样 便于 领域 专家 验证 测试 用 例 的 正确 性 。 在 我 那 
个 金融 中 介 系 统 的 项 日 中 有 这 样 一 个 测试 用 例 : 对 于 证 券 公司 蹦 蹦 高 证 券 以 40% 价 格 发 行 、 面 值 
为 10 000 美 元 、 首 次 计 息 日 为 2001 年 5 月 15 日 的 零 息 债券 ， 投资 者 应 在 发 行 时 支付 4000 美 元 。 这 
个 测试 用 例 无 论 建 模 者 、 测 试 者 还 是 负责 审阅 的 领域 专家 都 能 完全 理解 ,因为 它 采 用 了 最 自然 的 
领域 语言 作为 编写 用 语 。 

3. 开发 中 的 共通 语汇 

如 果 开 发 团队 用 共通 语汇 来 表述 程序 模块 , 那么 产生 的 代码 也 将 使 用 同一 种 领域 培 言 。 如 有 末 
你 提起 模块 的 时 候 都 用 “债券 交易 模块 "、“ 证 券 结算 模块 ”一 类 的 字眼 ,那么 写 代码 的 时 候 自 然 
就 会 用 同样 的 字眼 命名 领域 实体 。 

在 问题 域 与 解答 域 之 间 发 展 出 一 套 共通 语汇 是 走 同 解答 域 的 第 一 步 。 让 我 们 给 图 1-1 添 上 “ 共 
通 语汇 ”这 个 维系 两 个 领域 的 粘 合 剂 ， 结 果 如 图 1-2 所 示 。 

问题 域 制品 






































共通 语汇 





图 1-2 ”问题 域 和 解答 域 学 有 共同 的 语汇 ， 可 降低 信息 传达 的 困难 度 。 在 共通 语汇 之 
下 ,你 可 以 从 间 题 域 的 制品 追踪 到 它 在 解答 域 的 相应 表示 
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你 已 经 知道 开发 者 和 领域 专家 要 有 共通 语汇 , 但 是 语言 要 怎样 映射 到 解答 域 呢 ” 对 于 开发 者 
制作 的 模型 ， 领 域 专家 能 理解 多 少 ? 沟通 问题 是 软件 开发 生态 系统 中 的 常见 问题 。 

看 过 图 1-2， 你 应 该 会 知道 不 可 能 指望 领域 专家 直接 理解 目前 构成 解答 域 的 技术 制品 ， 他 们 
不 具备 那样 的 能 力 。 随 着 系统 复杂 度 的 提高 ,模型 开始 膨胀 ,沟通 的 障碍 也 越 来 越 多 。 可 是 领域 
专家 其 实 没 必要 理解 那些 与 实现 模型 相关 的 复杂 细节 , 验证 业务 规则 实现 得 正 不 正确 才 是 他 们 该 
做 的 事情 。 理想 情况 下 , 领域 专家 可 以 自己 编写 测试 脚本 去 验证 领域 规则 的 实现 的 正确 性 及 完善 
程度 ， 但 这 不 是 一 个 现实 的 方案 。 

那么 有 没有 可 能 以 共通 语汇 为 基础 , 为 领域 专家 建立 一 种 沟通 模型 , 并 让 其 他 人 也 都 能 流利 
说 出 领域 专家 的 日 常 业务 用 语 ?可 以 办 到 。 这 正 是 DSL 发 挥 作用 的 时 刻 | 
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TR eU WEZ RJ] JIT SEA A AP A4) A AETA REE, A A e T —HR ULIS Fan E 
幕 。 令 他 感到 惊讶 的 是 , Jr ACH BOTE TU EE ZR ER PINITR Jr i514 HUS HEF FFEA BE 
的 编程 环境 一 一 里 敲 一 些 命令 和 语句 。 下 面 是 他 们 之 间 的 对 话 。 
口 ZR: 嘿 ， 老 鲍 ， 你 还 会 编程 ? 
口 SS. 咽 ， 会 点 儿 ， 可 以 在 我 们 的 新 系统 TrampolineEasyTrade 中 编 点 儿 。 
口 乔 : 可 你 不 是 交易 员 吗 ? 
O ži: 交易 员 怎 么 了 ? 交易 员 就 用 这 个 软件 做 交易 。 
口 ZR: 软件 是 提供 给 你 们 使 用 的 ， 没 打算 让 你 们 在 里 头 编 程 。 而且， 这 产品 还 没 开发 完 呢 。 
OD d$: 可 既然 是 我 将 来 要 用 的 软件 ， 现 在 我 给 它 编 一 些 测试 不 是 担 好 吗 ? 这 样 一 来 ， 我 
的 意见 可 以 尽早 反馈 给 开发 团队 ; 近 距 离 参 与 ， 自 我 感觉 贡献 更 大 ; 我 会 对 开发 中 的 产 
品 更 有 信心 。 mE, 我 还 可 以 验证 我 的 用 例 能 不 能 通过 。 

口 乔 : 但 这 是 开发 团队 的 职责 ! 我 每 天 都 和 他 们 沟通 。 我 们 有 工具 检查 代码 震 盖 率 、 测 试 
窗 盖 率 以 及 各 种 指标 ， 肯 定 能 保证 交付 最 好 的 软件 。 

口 考 鲍 : 就 对 金融 中 介 系 统 这 个 领域 的 了 解 而 言 ， 你 觉得 谁 更 懂 ? R, 还 是 你 的 那 套 工具 ? 

最 后 , 乔 不 得 不 认同 老 鲍 映 为 金融 中 介 系 统领 域 的 专家 , 更 有 能 力 检 查 新 交易 平台 是 否 正确 、 
充分 地 满足 了 功能 规格 书 的 要 求 。 只 不 过 乔 还 是 不 懂 , 为 什么 老 鲍 不 是 程序 员 却 也 会 用 测试 框架 
写 测试 。 

谈 者 想必 也 有 同样 的 疑惑 。 那 就 来 看 看 下 面 的 代码 清单 ， 这 正 是 “刚刚 ” 老 饮 在 屏幕 上 殴 出 
的 内 容 。 


代码 清单 1-1 用 DSL 编 写 的 交易 单 处 理 过 程 
place orders ( 
new Order to buy(100 sharesOf "IBM") 
limitPrice 300 
allOrNone 
using premiumPricing, 
new Order to buy(200 sharesOf "CISCO") 
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limitOnClosePrice 300 
using premiumPricing, 

new Order to buy(200 sharesOf "GOOGLE") 
limitOnOpenPrice 300 
using defaultPricing, 

new Order to sell(200 bondsOf "SUN") 
limitPrice 300 
allOrNone 
using í( 

(qaty, unit) => qty * unit - 500 
} 
) 


好 像 真 是 代码 呢 。 没 错 , 但 同时 代码 里 的 一 些 用 语 就 跟 老 鲍 平 常 坐 上 交易 台 时 说 的 那 种 语言 
一 样 ,。 老 鲍 正 在 编写 一 段 创建 新 交易 单 的 脚本 ,里 面 按照 不 同 定价 策略 生成 了 各 种 交易 单 的 样本 。 
除了 预定 义 的 策略 ， 他 还 可 以 在 下 单 的 时 候 目 定义 一 种 定价 祖 略 。 
老 鲍 编程 用 的 是 什么 语言 ?只 要 能 完成 工作 , 他 一 点 儿 痢 不 在 意 。 对 于 他 来 说 ,这 种 编程 语 
言 跟 他 在 交易 台 上 用 的 没什么 两 样 。 不 过 对 于 我 们 来 说 , 老 印 所 做 的 事 悄 与 程序 员 们 日 第 编 写 代 
码 的 工作 有 何不 同 ， 这 值得 细 辨 一 看。 
a 老 鲍 的 编程 语言 用 语 息 合 他 所 属 的 领域 。 他 可 以 把 平日 在 交易 台 前 为 客户 下 单 所 用 的 术 
语 原封 不 动 地 写 进 测试 脚本 。 

口 他 所 用 的 语言 ， 从 刚才 所 见 的 那 一 段 来 看 ， 并 不 适用 于 金融 中 介 业 务 以 外 的 领域 。 

O 这 种 霹 言 的 表现 力 很 强 ， 老 鲍 只 需要 照 着 平帝 给 客户 创建 新 定单 的 步骤 按部就班 ， 就 能 
把 要 做 的 事情 清晰 地 表达 出 来 。 

Q 这 种 语言 语法 简明 。 蜗 级 编程 语言 中 第 见 的 复杂 语法 细 市 奇迹 般 地 不 见 了 了。 

老 鲍 所 用 的 正 是 一 种 为 金融 中 介 系 统 量 喘 订 做 的 领域 专用 语言 。 此 刻 , 背后 用 什么 语言 来 实 
现 DSL 显 得 无 关 渤 有 要。 我们 很 难 从 代码 清单 1-1 中 看 出 来 育 后 用 的 是 哪 种 语言 ， 这 正好 次 明 设计 
者 成 功 地 为 该 领域 创造 了 一 种 军 于 表现 力 的 语言 。 





























1.3.1 何 为 DSL 


DSL 是 一 种 针对 特定 问题 的 编程 语言 ， 我 们 平 种 所 用 的 编程 语言 用 途 更 为 宽泛 。DSL 含 有 建 
模 所 需 的 语法 和 语义 , 在 与 问题 域 相同 的 抽象 层次 对 概念 建 模 ,例如 , 你 要 点 一 份 肉 桂 拿 铁 咖 啡 ， 
就 对 店员 使 用 她 所 掌握 的 领域 语言 。 




















定义 “抽象 是 人 类 大 脑 的 一 种 认 知 过 程 ， 它 使 我 们 集中 注意 力 于 认 知 对 象 的 核心 层面 ， 忽 略 不 必 
要 的 细节 。1.7 节 会 进一步 讨论 抽象 与 DSL 设 计 的 关系 ， 附 录 A 则 完全 是 关于 抽象 的 内 容 。 


用 DSL 写 出 来 的 程序 ， 任何 一 方面 的 品质 都 不 应 该 低 于 用 其 他 计算 机 语言 编写 的 程序 。DSL 
还 应 该 赋予 你 设计 领域 中 抽象 概念 的 能 力 。 在 问题 域 可 以 用 小 的 实体 搭建 出 大 的 实体 , 那么 在 解 
A, 设计 得 当 的 DSL 应 该 给 予 你 同样 灵活 的 组 合 能 力 ， 让 你 能 人 够 就 像 编排 问题 域 的 各 种 机 能 一 
样 编排 起 各 种 DSL 抽 象 。 
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现在 你 已 了 解 什么 是 DSL， 接 下 来 看 看 它 与 你 用 过 的 其 他 编程 语言 有 何不 同 。 

1. DSL 与 通用 编程 语言 的 区 别 

领域 专用 语言 这 个 名 字 其 实 已 经 给 出 了 答案 。 你 应 该 牢记 DSL 最 重要 的 两 个 特征 : 

O 一 种 DSL 专 门 针 对 一 个 特定 的 问题 领域 ; 

口 DSL 含 有 建 模 所 需 的 语法 和 语义 ， 在 与 问题 域 相同 的 抽象 层次 对 概念 建 模 。 

用 DSL 编 程 时 只 需要 处 理 问题 域 的 复杂 性 , 你 用 不 看 操心 解答 域 的 实现 细 方 和 其 他 非 必 要 因 
奈 。( 关于 非 本 质 复杂 性 的 讨论 ， 参 见 附录 A。) 因此 ， 多 数 情 况 下 非 专业 程序 员 也 能 用 好 DSL， 
前 提 是 DSL 具 备 了 适当 的 抽象 层次 。 数学 家 能 轻松 学 会 使 用 Mathematica 进 行 工 作 , UI 设计 师 写 起 
HTML 来 怡然 自得 ， 就 连 硬件 工程 师 都 有 VHDL ( 超 高 速 集 成 电路 人 硬件 描述 语言 ， 是 一 种 在 电子 
设计 自动 化 即 EDA 领 域 使 用 的 DSL ) 可 用 ,这 些 都 是 非 专 业 程序 员 使 用 DSL 的 例子 。 因 为 要 适应 
非 程序 员 ，DSL 必 须 比 通用 编程 语言 更 符合 用 户 的 直觉 。 

程序 并 不 是 一 次 写 完 了 事 ， 之 后 还 要 维护 更 新 很 多 年 ， 而 其 中 负责 “照料 ”程序 的 人 很 可 能 
并 没有 参与 设计 最 初 的 版 本 。 因 此 ， 沟 通 是 一 个 关键 问题 : 程序 要 有 能 力 与 它 的 目标 读者 沟通 。 
对 于 DSL， 编 译 袁 和 CPU 都 不 是 它 的 直接 读者 ， 有 心理 解 程 序 行为 的 人 类 大 脑 才 是 它 的 “倾诉 对 
象 ”。 语 言 要 利于 交流 ， 要 让 代码 片段 能 够 充分 体现 出 建 模 者 的 思考 过 程 。 这 就 要 求 在 设计 DSL 
的 时 候 为 语法 和 语义 都 找 准 适合 用 户 的 抽象 层次 。 

2. DSL 对 业务 用 户 的 益处 

讨论 到 这 里 ， 我 们 可 以 总 结 出 DSL 区 别 于 一 般 高 级 编程 语言 的 两 大 特质 ， 如 下 。 

O DSL 给 予 用 户 更 高 层次 的 抽象 ,也 就 是 说 用 户 不 必 分 心 于 具体 数据 结构 的 微妙 差别 等 低层 

次 细节 ， 而 是 专注 于 解决 手头 的 问题 。 
口 DSL 只 提供 有 限 的 语汇 , 不 超出 它 的 领域 范围 。 正 因为 DSL 排 除了 多 余 的 东西 ， 它 能 够 帮 
助 用 户 专 注 于 被 建 模 的 问题 。DSL 的 “视野 ”不 似 通 用 编程 语言 那 般 横 癌 发 散 。 

对 于 不 懂 编 程 的 领域 专家 , 这 两 种 特质 使 DSL 成 为 了 更 便利 的 工具 。 业务 分 析 员 了 解 的 领域 ， 
就 是 DSL 抽 象 出 来 的 领域 。 

随 着 越 来 越 多 的 编程 语言 文 持 更 高 层次 的 抽象 设计 , 各 种 DSL 正 圣 首 以 竺 成 为 现今 程序 开发 
生态 系统 的 重要 组 成 部 分 。 不 慌 编 程 的 领域 分 析 师 肯定 会 在 其 中 扮演 重要 的 角色 。 如 果 有 DSL， 
分 析 师 从 一 开始 就 能 撰写 正确 的 测试 脚本 。 测试 脚本 不 是 为 了 立即 运行 , 而 是 用 来 保证 编写 程序 
时 充分 考虑 到 各 种 可 能 的 业务 场景 。 只 要 DSL 的 设计 找 准 了 抽象 层次 , 让 领域 专家 直接 浏览 定义 
业务 逻辑 的 源 代码 就 不 是 什么 异乎 寻常 的 事情 。 他 们 将 可 以 验证 业务 规则 , 然后 把 检查 结果 直接 
反馈 给 开发 者 。 

现在 , 我 们 已 经 了 解 到 DSL 可 以 给 开发 者 和 领域 用 户 带 来 不 少 好 处 ， 下 面 来 认识 一 下 目前 已 
在 业界 广泛 使 用 的 儿 种 领域 专用 语言 。 


1.3.2 ”流行 的 几 种 DSL 


DSL 应 用 非常 广泛 。 我 地 肯定 你 开发 过 的 每 一 个 应 用 程序 都 用 到 不 少 DSL， 虽然 有 些 不 一 定 
被 打上 DSL 的 标签 。 表 1-1 列 举 了 几 种 最 常用 的 DSL。 
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表 1-1 常用 的 DSL 














DSL Hox 
SQL 关系 型 数据 库 语言 ， 用 于 查询 和 变更 数据 
Ant, Rake, Make 几 种 用 于 软件 系统 构建 的 语言 
CSS 样式 表 拉 述 语言 
YACC, Bison, ANTLR 几 种 用 来 生成 语法 分 析 需 的 语言 
RSpec、Cucumber Ruby 环 境 下 的 行为 驱动 测试 语言 
HTML 用 于 Web 的 标记 语言 


你 平时 经 背 用 到 的 DSL 肯 定 不 止 这 些 。 你 能 分 辨 出 它们 有 什么 共同 特征 吗 ? 来 看 下 面 儿 点 。 

O 所 有 DSL 都 有 对 应 专门 的 领域 。 每 种 语言 都 拥有 “有 限 表达 力 ”(1limited expressivity )， 而 
你 只 能 用 一 种 DSL 解 决 其 特定 领域 的 问题 。 你 不 可 能 只 用 HTML 搭建 出 一 套 货 运 管理 
系统 。 








定义 ”马丁 。 福 勒 (Martin Fowler) 用 “有 限 表 达 力 ”来 描述 DSL 最 重要 的 特征 。 在 2009 
年 DSL 开 发 者 会 议 的 主题 演讲 (参见 1.9 节 文献 [3] ) 上 ， 他 提出 有 限 表 达 力 是 DSL 
与 通用 编程 语言 的 根本 区 别 。 通 用 编程 语言 可 以 给 任何 事物 建 模 ， 而 一 种 DSL 只 
能 给 一 个 专门 领域 建 模 ， 可 是 表现 力 更 强 。 


a 使 用 表 1-1 列 出 的 语言 (以 及 其 他 被 广泛 使 用 的 语言 )， 一 般 即 使 用 它们 所 建立 的 抽象 。 在 
绝 大 多 数 情 况 下 , 你 并 不 需要 了 解 语言 的 底层 实现 。 每 种 DSL 都 提供 了 一 套 供 你 搭建 解答 
域 模型 的 契约 ， 为 了 搭建 更 复杂 的 模型 可 以 把 不 同 的 契约 组 合 起 来 ， 但 终归 不 需要 蜂 出 
契约 的 范围 和 深入 DSL 的 实现 层次 。 
a 任何 一 种 DSL 都 具备 充分 的 表达 能 力 , 足以 使 不 懂 编 程 的 用 户 理解 程序 的 意图 。DSL 并 非 
给 开发 者 提供 的 一 套 API 而 已 ， 它 的 每 一 个 API 都 以 领域 语汇 精炼 地 表达 丰富 的 含义 。 
O 用 任何 一 种 DSL 编 写 的 源 代码 文件 , 即使 数 月 之 后 再 重新 翻 看 , 你 也 可 以 立即 领会 当初 的 
p.45 
事实 证 明 , 依托 DSL 进 行 开发 更 能 或 励 开 发 者 与 领域 专家 进行 更 好 的 交流 。 这 是 其 很 重要 的 
优点 。 借 助 DSL， 不 擅长 编程 的 领域 专家 不 必 勉 强 转变 为 一 般 程序 员 。 得 益 于 DSL 的 表现 力 和 其 
特意 以 沟通 为 目的 提供 的 API， 领 域 专家 可 以 理解 解答 域 的 抽象 实现 了 哪些 业务 规则 ， 以 及 其 实 
现 是 否 充 分 覆盖 了 所 有 可 能 的 业务 场景 。 
我 们 来 看 一 段 有 启发 意义 的 Rakefile 代 码 片 段 ,示例 中 所 用 的 Rake 也 是 表 1-1 所 列 的 一 种 DSL， 
主要 用 于 构建 Ruby 语 言 编 写 的 系统 : 


desc "Default Task" 
task :default -» [ :test ] 


























Rake::TestTask.new { |t] 
t.libs << "test" 
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t.pattern = 'test/* test.rb' 
t.verbose - true 
t.warning - false 


这 段 代 码 建 立 一 系列 单元 测试 , 并 把 它们 作为 默认 任务 来 运行 。 BIBETRANTERuby, 也 不 会 看 
错 这 段 代码 的 意思 ; 它 的 表达 能 力 没 有 受 影 响 。 这 是 怎么 做 到 的 ? 它 各 处 重要 部 分 的 用 词 正 好 匹 
配 了 你 所 见 悉 的 语汇 ， 而 且 给 DSL 使 用 者 提供 了 简单 明了 的 界面 。Rake 的 使 用 者 是 软件 开发 人 
fA. 所 以 这 种 语言 将 其 语义 设 定 到 符合 开发 者 预期 和 理解 力 的 抽象 层次 。 同 样 ， 如 果 打 算 开 发 一 
种 给 金融 交易 员 和 群体 使 用 的 DSL, 你 必须 谨 记 使 表现 力 层 次 符合 交易 人 台 上 的 人 的 预期 和 经 验 。 这 
里 的 附加 内 容 简 要 说 明 交 易 系 统 的 一 些 基 本 术语 ; 请 了 解 一 下 相关 定义 , 因为 这 些 概念 会 反复 出 
现在 本 书 所 用 的 DSL 示 例 中 。 


























Eo 金融 中 介 系 统 : 交易 和 结算 

交易 在 两 方 (交易 双方 ) 之 间 进 行 ， 遵照 交易 市 场 的 规 
易 只 是 承诺 ， 需 要 在 交易 发 生 后 的 规定 天 数 内 完成 结算 。 进 
干 因素 确定 ， 如 实行 交易 的 具体 市 场 、 证 券 的 生命 周期 、 交 
HOS 

每 一 笔 交 易 都 对 应 一 个 现金 价值 。 现 金价 值 是 购买 证 券 的 一 方 应 付出 的 金钱 数量 。 现 金价 
值 取决 于 若干 因素 ， 例 如 基本 价值 、 印 花 税 、 经 纪 费 用 和 佣金 等 。 

交易 在 证 券 交 易 所 成 交 后 , 其 详情 被 输入 到 交易 机 构 的 后 台 完 成 一 个 交易 充实 过 程 ， 由 交 
易 系统 计算 出 所 有 的 细节 事项 : 结算 日 、 交 易 税 、 佣 金 和 最 终 的 现金 价值 。 


章 进 行 证 券 与 现金 之 间 的 互 换 。 交 
行 结算 的 日 期 称 为 结算 日 ,根据 若 
易 的 性 质 、 实 行 交易 的 日 期 (交易 


设计 DSL 的 时 候 ， 你 要 时 刻 把 使 用 者 放 在 心 上 。DSEL 的 表现 力 和 粒度 要 尽力 满足 用 户 理解 的 
需要 。 你 会 在 后 面 的 章节 中 学 习 如 何在 用 户 感 党 最 卓然 的 抽象 层次 上 设计 DSL。 现 在 我 们 和 来 考 
虑 DSL 怎 样 更 好 地 在 问题 域 和 解答 域 之 间 建 立 映 射 ， 填 补 图 1-2 缺 失 的 一 些 环 人 ， 使 你 对 此 有 更 
全 面 的 认识 。 








1.3.3 DSL 的 结构 





图 1-3 展 现 了 DSL 脚 本 怎样 将 共通 语汇 联系 到 解答 域 的 实现 模型 。 

设计 得 当 的 DSL 应 该 体现 以 下 三 项 原则 ， 以 便 与 领域 用 户 更 好 地 “沟通 ”。 

a DSL 要 为 问题 域 制品 提供 直接 的 映射 。 如 果 问 题 域 有 一 个 名 为 Trade 的 实体 ， 那 么 DSL 脚 
本 就 必须 包含 同样 名 称 同样 角色 的 一 个 抽象 。 

口 DSL 脚 本 必须 使 用 问题 域 的 共通 培 汇 ,这 些 语汇 将 成 为 开发 者 与 业务 用 户 增进 交流 的 众 化 
剂 。 如 图 1-3 所 示 ， 当 业务 用 户 与 软件 中 的 领域 模型 交互 的 时 候 ，DSL 脚 本 就 是 他 们 的 用 
Pl. 

O DSL 脚 本 必须 对 的 层 实现 进行 抽象 这 是 抽象 设计 的 一 项 重要 原则 , 对 于 DSL 的 设计 同样 
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适用 。DSL 脚 本 中 不 可 以 出 现 因为 实现 细节 而 引入 的 非 本 质 复杂 性 ”。 


解答 域 制品 





问题 域 制品 





DSL 的 实现 
面向 领域 用 户 的 界面 的 实现 








图 1-3 DSL 脚本 将 实现 模型 表示 为 领域 二 言 。 脚 本 中 的 用 词 痢 出 目 共 通 语汇 ,使 用 户 
对 语言 感觉 更 日 然 


在 图 1-3 中 ,“DSL 脚 本 ”市 点 与 其 他 市 点 的 联系 即 为 以 上 三 项 原则 的 形象 表示 。 只 要 在 设计 
中 牢记 这 些 原 则 ， 你 所 设计 的 DSL 束 能 充分 发 挥 与 领域 用 户 “ 沟 通 ” 的 效果 。 下 一 广 将 讲述 DSL 
的 执行 模型 一 一 当 用 户 运行 软件 时 DSL 脚 本 及 其 实现 模型 是 如 何 呈 现 给 用 户 的 。 














1.4 DSL 的 执行 模型 


领域 专家 通过 DSL 脚 本 理解 领域 模型 和 业务 规则 ， 而 开发 者 负责 实现 DSL 这 个 技术 支撑 平 
人 台 。 大 多 数 情 况 下 ,DL 无非 是 覆盖 于 和 宿主 语言 之 上 的 一 个 抽象 层 ,同业 务 用 户 提 供 领 域 友 好 的 
Sum. 其 实 不 一 定 是 宿主 语言 , 详 见 1.5 节 的 DSL 分 类 。 ) 可 以 这 么 说 , 你 要 做 的 事情 就 是 对 宿主 
语言 进行 扩展 , 在 其 上 实现 另 一 种 语言 。 这 种 用 一 种 语言 实现 另 一 种 语言 的 概念 有 时 候 称 为 元 话 
言 学 抽象 。 有 些 DSL 并 不 通过 内 藤 方 式 实现 ， 也 许 开 发 团队 会 为 DSL 特 别 设计 一 种 定制 语言 。 不 
同类 型 的 DSL 实 现 方式 我 们 放 到 1.5 节 讨论 ， 现 在 先 来 看 看 怎样 执行 DSL 脚 本 。 

图 1-4 展 示 了 三 种 最 和 常见 的 DSL 脚 本 执行 方式 。 
































CD 非 本 质 复杂 性 (accidental complexity )， 与 本 质 复 杂 性 ( essential complexity ) 相对 应 ， 指 程序 开发 过 程 中 出 现 的 、 
与 问题 本 身 无 关 的 复杂 性 。 本 质 复杂 性 是 与 生 俱 来 不 可 避免 的 ， 而 非 本 质 复 杂 性 却 是 由 于 解决 问题 的 手段 而 产 
生 的 。 一 一 译 者 注 
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(1) 脚本 中 的 解答 域 模型 可 以 再 接 执行 ， 无 需 进 行 代码 生成 或 其 他 变换 操作 。 可 能 有 一 个 解 
释 囊 二 接 解释 并 运行 脚本 。UNIX 中 的 微型 编程 声言 awk 和 sed 禾 是 能 百 接 执行 的 DSL。 

(2) 在 虚拟 机 上 开发 的 DSL 脚 本 还 照 第 二 种 执行 模型 。 任 何 Java DSL 脚 本 的 语义 模型 都 生成 
在 JVM 上 执行 的 字 节 码 。 

Q) 有 些 语言 提供 编译 时 元 编程 能 力 。 当 用 这 样 的 语言 开发 DSL 时 ， 开 发 者 在 源 代 码 中 加 入 
一 些 元 结构 ， 它 们 会 在 运行 前 被 转译 成 一 般 博 法 成 分 。Lisp 通 过 宏 来 文 持 这 种 实现 手法 ，Lisp 宏 
会 在 宏 展开 阶段 展开 成 一 般 的 Lisp 成 分 (主见 附录 B ) 对 于 这 类 语言 ,在 为 虚拟 机 生成 学 市 码 之 
前 ， 存 在 一 个 对 源 代 码 进行 转 详 的 中 间 阶 段 。 


解答 域 制品 (类 、 方 法 、 模 块 ) 














(被 实现 ) 


= "e 
KC 
加 
"2 解答 域 模 型 
o | | 
EE RB aes 


e 
> rs HE RN S 5 
© ”生成 字 节 码 后 执行 
图 1-4 DSL 脚本 的 三 种 执行 模型 。 实 现 了 解答 域 模型 的 程序 可 以 直接 执行 @; 可 以 编 
成 字 节 码 后 执行 @;， 可 以 先 对 源 代码 进行 转译 ( 像 Lisp 宏 ) ， 然 后 生成 字 节 码 
再 执行 合 














蚤 悉 三 种 最 常见 的 DSL 脚 本 执行 模型 之 后 ,我 们 回 尖 看 看 代码 清单 1-1 中 老人 鲍 摆 弄 的 那 段 
DSL。 你 会 发 现 ， 不 管 选择 什么 样 的 实现 语言 ，DSL 脚 本 下 面 必定 有 一 个 语义 模型 作 支 撑 。 这 个 
语义 模型 可 以 是 Ruby 或 Scala 之 类 的 和 宿主 语言 ， 也 可 以 是 工作 在 蹦 蹦 高 证 券 公司 的 程序 员 专 为 金 
融 交易 DSL 设 计 的 一 种 定制 语言 。 

以 常用 的 构建 工具 Ant 为 例 , 它 向 用 户 提 供 了 一 种 基于 XML 的 DSL。 当 看 到 下 面 的 XML 片段 
时 ， 开 发 者 会 认为 它 表 达 的 都 是 一 些 熟 悉 的 概念 。 我 们 很 容易 看 懂 它 的 任务 目标 ， 即 构建 一 个 
jar， 而 这 个 任务 依赖 于 compile 任 务 。 


«target name-"jar" depends-"compile"-» 
«mkdir dirz"Sibuild.dist)"/» 
«jar jarfile-"Sí(build.dist)/Síname])-Síversionj].jar"» 
«fileset dir-"S$(build.classes)" includes-"**"/-» 
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«fileset dir="S{src.dir}"> 
«include name="*"/> 
</fileset> 
«/jar» 
</target> 


这 段 DSL 脚 本 的 背后 有 一 个 语义 模型 ; 其 实现 用 Java 类 、 方 法 和 包 的 形式 建立 “任务 ”~“ 依 
赖 ” 等 界面 。 开 发 者 在 使 用 Ant 时 不 需要 越过 DSL 接 口 去 深究 Ant 的 内 部 实现 ; 当然 ， 因 为 Ant 是 
一 个 可 扩展 的 框架 ， 所 以 还 是 存在 例外 情况 ,但 也 仅仅 不 过 是 例外 。 

目前 为 政 ， 我 们 讨论 的 DSL 脚 本 主要 是 通过 扩展 箱 主 语言 来 设计 的 , 但 DSL 脚 本 并 不 只 这 一 
种 类 型 。DSL 还 可 以 按 其 实现 方式 进行 分 类 。 下 一 市 将 阐述 DSL 的 分 类 法 。 











1.5 DSL 的 分 类 


DSEL 用 领域 语言 来 表达 。 领 域 的 内 洱 越 丰富, DSL 的 表现 力 就 应 当 越 强 。 对 于 领域 用 户 来 说 ， 
DSL 帮 助 他 理解 领域 的 来 龙 去 脉 ， 至 于 开发 者 怎么 实现 其 底层 模型 ， 这 一 点 并 不 重要 ， 只 要 DSL 
脚本 能 提供 他 对 领域 抽象 的 一 致 访问 就 行 了 。 

最 第 见 的 分 类 方法 是 按照 DSL 的 实现 途径 来 分 类 。 马 丁 :' 福 勒 曾 将 DSL 分 为 内 部 和 外 部 两 大 
类 ,他 的 分 类 法 得 到 了 绝 大 多 数 业 界 人 士 的 认可 和 沿 窒 。 内 部 与 外 部 之 分 取决 于 DSL 是 否 将 一 种 
现存 语言 作为 答 主 语言 ， 在 其 上 构建 自身 的 实现 。 内 部 DSL 也 称 内 说 式 DSL， 因 为 它们 的 实现 刍 
人 到 笨 主 语言 中 ， 与 之 合 为 一 体 。( 内 部 DSL 在 第 5 章 和 第 6 章 有 进一步 的 叙述 ， 届 时 我 们 将 演示 
如 何 用 Ruby、Groovy、Scala、Clojure 等 JVM 语 言 实 现 DSL。) 外 部 DSL 也 称 独立 DSL， 因 为 它们 
是 从 雪 开 始 建立 起 来 的 独立 语言 ， 而 不 基于 任何 现 有 簿 主语 言 的 设施 建立 。 第 7 音 和 第 8 曹 将 继续 
介绍 外 部 DSL。 

除了 这 两 大 类 ， 还 有 新 出 现 的 一 些 DSL 开 发 范式 。 例 如 ，Intentional Software ( http://www. 
intentsoft.com/ ) 等 公司 推出 了 创建 非 文本 型 DSL 的 工具 。 像 这 样 的 一 些 发 展 和 增长 趋势 详 见 第 9 
昔 。 目 前 我 们 暂且 把 注意 力 放 到 两 个 主要 类 别 上 ， 通 过 一 些 例子 来 看 下 它们 各 目的 特点 。 























1.5.1 内 部 DSL 


内 部 DSL 将 一 种 现 有 编程 语言 作为 宿主 语言 ， 基 于 其 设施 建立 专门 面向 特定 领域 的 各 种 语 
义 。 目 前 使 用 最 广泛 的 一 个 内 部 DSL 是 Rails， 它 是 在 编程 语言 Ruby 的 基础 上 实现 的 。 当 你 编写 
Rails 代 人 码 ， 实际 上 就 是 在 运用 Rails 给 Web 开 发 制定 的 各 种 语义 编写 Ruby 程 序 。 大 多 数 情况 下 ， 内 
部 DSL 就 是 在 笨 主 语言 之 上 实现 的 库 。2.1 市 将 以 Java 和 Groovy 为 箔 主语 言 带 你 开发 一 种 用 于 订单 
处 理 的 DSL。 图 1-5 描 绘 了 内 部 DSL 的 结构 。 

如 图 1-5 所 示 ， 内 部 DSL 脚 本 只 是 在 用 答 主 语言 实现 的 抽象 上 进行 了 少许 修饰 。 我 们 再 来 看 
看 外 部 DSL。 
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宿主 语言 (例如 Java、Ruby、 
Groovy, Clojure, Scala) 


-- 





。 利用 宿主 语言 的 设施 
。 利用 宿主 语言 的 配套 工具 
。 局 限于 和 宿主 语言 所 提供 的 语法 和 语义 


图 1-5 ”利用 现 有 箱 主 语言 及 其 设施 来 实现 内 部 DSL 








1.5.2 外 部 DSL 


外 部 DSL 征 从 堆 开 发 的 DSL， 在 词法 分 机、 解析 技术 、 解 释 、 编 详 、 代 码 生 成 等 方面 拥有 独 
芯 的 设施 。 开 发 外 部 DSL 近 似 于 从 零 开 始 实现 一 种 拥有 独特 语法 和 语义 的 全 新 语言 。 构 建 工具 
make、 语 法 分 析 需 生成 工具 YACC 、 词 法 分 析 工 具 LEX 等 都 是 稼 见 的 外 部 DSL。 当 然 ， 外 部 DSL 
实现 的 复杂 程度 取决 于 你 希望 密 有 多 丰富 的 内 涵 。 一般 来 说 , 外 部 DSL 并 不 需要 像 完 善 的 语言 那 
么 复杂 。 第 7 章 和 第 8 章 会 给 出 大 量 示例 。 图 1-6 展 示 了 外 部 DSL 的 结构 是 如 何 基 于 定制 的 语言 设 
施 形 成 的 。 

















语法 分 析 / 解 释 执行 
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定制 的 语言 设施 
。 词 法 分 析 器 
。 语 法 分 析 器 
图 1-6 ”你 需要 为 外 部 DSL 自 行 开发 语言 处 理 的 设施 。 设 施 包 括 一 般 高 级 语言 实现 中 常 
见 的 词法 分 析 带 、 语 法 分 析 紫 和 代码 生成 带 和 等。 注意 ， 各 部 分 的 复杂 程度 取决 
于 语言 的 精细 程度 


图 1-6 展 示 了 外 部 DSL 的 一 般 组 成 部 分 。 在 实际 开发 中 ， 上 面 列 出 的 各 部 分 未 必 全 部 用 得 上 ， 
而 且 你 可 能 需要 根据 语言 的 复杂 程度 决定 合并 其 中 一 些 组 成 部 分 。 
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DSL 是 不 是 总 要 以 文本 的 形式 出 现 呢 ? 不 一 定 , 很 多 时 候 图 形 化 的 表示 更 加 一 日 了 然 。 详情 
请 看 下 文 。 


1.5.3” 非 文本 DSL 


除了 内 部 和 外 部 DSL, 业界 还 有 一 种 正在 增长 的 趋势 , 即 倾向 于 发 展 更 丰 宇 的 领域 建 模 手段 。 
DSL 是 领域 的 一 种 表示 形式 ,但 其 定义 中 并 没有 便 性 规定 这 种 表现 形式 或 语言 必须 是 文本 形式 
的 。 实 际 上 , 很 多 人 都 认为 程序 代码 用 作 表 达 领 域 知识 的 媒介 太 过 单薄 ， 有 时 无 力 胜 任 。 他 们 和 常 
给 出 以 下 理由 : 

OQ 文本 人 允许 的 标识 符 吕 有限， 限制 了 对 领域 问题 的 表达 月 由 ; 

a 很 多 领域 问题 可 以 通过 电子 表格 、 图 形 化 模型 等 丰富 的 制品 形式 更 好 地 展现 给 领域 用 户 ; 

口 在 基于 文本 的 脚本 中 ， 领 域 逻辑 党 散落 在 曲折 交错 的 语法 结构 里 ,不经意 地 增加 了 复 

JRE; 

Q 领域 专家 操作 起 形象 化 的 模型 总 是 比 操作 源 代 码 更 目 如 。 

出 于 以 上 原因 ,一 种 新 型 的 DSL 正 迅速 成 为 收集 和 建 模 领域 知识 的 新 一 代 手 段 。 领 域 用 户 通 
过 一 种 “投影 编辑 侣 ”( Projection Editor ) 观察 和 处 理 领 域 知 识 的 表现 形式 。 投 影 编 辑 表 可 以 将 
领域 的 适当 视图 投影 给 用 户 , 用 户 可 对 其 做 各 种 调整 ， 无 需 编 写 哪 介 一 行 代码 。 然 后 ， 投 影 编 辑 
人 套 在 后 台 生 成 代码 对 用 户 的 意图 建立 模型 。Intentional 公 司 的 DSL Workbench ( http://www. 
intentsoft.com ) 和 JetBrains 公 司 的 Meta Programming System ( MPS, http:/www.jetbrains.com/mps ) 
是 两 种 可 以 建立 丰富 形态 DSL 的 建 模 工 具 。 第 9 章 讨论 基于 DSL 进 行 开发 的 未 来 趋势 ， 列 举 更 多 
这 方面 的 例子 ， 也 更 详细 地 介绍 了 这 类 工具 提供 的 功能 。 

把 DSL 分 成 内 部 、 外 部 、 非 文本 的 DSL 三 大 类 ， 只 是 广义 地 看 竺 不同 的 DSL 实 现 方 式 。 厂 从 
实用 性 出 发 ， 你 可 以 把 非 文 本 DSL 完 全 看 做 外 部 DSL， 因 为 用 来 实现 其 API 的 底层 设施 并 非 箱 主 
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现在 我 们 对 什么 是 DSL 有 了 相当 的 认识 ， 也 知道 如 何 用 它们 增进 开发 者 与 领域 用 户 的 沟通 ， 
那么 在 什么 情况 下 需要 创造 一 种 DSL? 应 不 应 该 每 开发 一 个 程序 都 编写 一 种 DSL? 还 是 说 存在 
- 些 特定 的 条 件 ， 在 那样 的 情况 下 采用 基于 DSL 的 开发 特别 有 利 ? 




















1.6 何 时 需要 DSL 





每 个 应 用 程序 的 业务 规则 都 应 该 明确 、 可 读 、 直 白 。DSL 是 对 业务 规则 建 模 的 最 佳 手段 。 开 
发 一 种 DSL， 把 原来 写成 time () - 1209600 的 时 间 表 示 形 式 变 为 2 .weeks .ago 并 不 难 ， 但 它 
对 用 户 可 能 产生 巨大 的 影响 。 

你 应 不 应 该 在 下 一 个 项 目 中 使 用 基于 DSL 的 开发 ? 作 决 定之 前 , 你 应 该 先 搞 量 一 下 各 种 优 缺 
点 。DSL 跟 任何 一 种 技术 一 样 ， 有 其 暗藏 的 危险 。 身 为 开发 者 ， 你 比 任何 人 都 更 有 资格 判断 眼前 
的 问题 是 否 需 要 用 DSL 来 建 模 。 为 此 ， 你 需要 了 解 DSL 通 常会 有 的 一 些 优点 和 缺点 。 
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1.6.1 RA 
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项 目 都 会 用 上 一 些小 的 DSL 引 擎 。 当 你 开始 规划 一 个 复杂 的 建 模 项 目 时 ， 应 该 在 有 意识 地 权衡 
过 各 种 选择 之 后 再 做 最 后 决定 。 下 面 提供 的 一 些 论点 将 有 助 于 你 决定 是 否 采用 基于 DSL 的 开发 

1. DSL 更 具 表 现 力 

DSL 趋 向 于 提供 一 种 覆盖 面 小 、 范 围 集 中 的 API 接 口 ， 处 理 的 各 种 抽象 概念 都 具有 和 领域 内 的 
精确 语义 。 用 户 热爱 DSL。 

2. DSL 更 精炼 

因为 精炼 ，DSL 易 于 观看 、 观 察 、 设 想 、 展 示 。Dan Roam (参见 1.9 节 文献 [2] ) 称 之 为 视觉 
化 思考 的 四 个 步骤 。DSL 的 精炼 性 缩短 了 程序 与 问题 之 间 的 语义 距离 。 

3. DSL 设 计 于 更 高 的 抽象 层次 

DSL 不 需要 应 对 低层 次 的 声言 构造 、 数 据 结构 优化 及 其 他 实现 手法 。 相 反 ，DSL 在 一 个 更 有 
利 的 层次 体现 领域 知识 ， 比 起 一 般 基 于 通用 编程 语言 的 实现 层次 ， 更 便于 领域 知识 的 保存 、 验 证 
和 重用 。 这 个 特点 使 得 DSL 符 合 许 多 不 改编 程 的 领域 专家 的 需求 。 

4. DSL 的 回报 更 高 

从 开发 生命 周期 的 长 远 来 看 ， 基 于 DSL 的 开发 趋向 于 产生 较 高 的 回报 。 

5. 基于 DSL 的 开发 容易 扩大 规模 

如 果 项 目 团 队 对 于 特定 编程 语言 的 掌握 程度 不 一 ， 可 以 让 康 练 的 程序 员 先 集中 精力 实现 
DSL， 然 后 给 其 他 成 员 使 用 。 因 为 DSL 的 抽象 层次 较 高 ， 所 以 更 易于 学 习 擎 握 ， 可 以 充当 一 种 打 
充 开 发 团队 的 载体 。 

任何 一 种 技术 范式 都 有 其 优点 ， 基 于 DSL 的 开发 范式 也 不 例外 。 我 们 会 在 第 3 章 继 续 讨 论 
基于 DSL 的 开发 。 下 面 是 DSL 通 党 存在 的 一 些 潜在 危险 , 它们 在 开发 项 目 中 的 出 现 会 令 你 大 为 















































1.6.2 WA 


DSL 的 所 有 缺点 都 可 以 关联 到 软件 开发 后 命 周 期 中 招致 额外 成 本 的 实现 开销 。 

1. 语言 设计 很 难 

实现 DSL 是 一 种 霹 言 设计 工作 ， 而 语言 设计 是 复杂 的 任务 ， 且 无 法 人 插 人 多 取胜 。 磊 及 从 雪 开 
人 设计 一 种 语言 的 词法 和 文法 的 复 淋 程度 ， 大 多 数 人 选择 将 DSL 寄 里 于 别 的 高 级 语言 之 中 。 即 便 
如 此 ,设计 工作 仍然 相当 难 ,， 绝 不 是 生 手 程序 员 可 以 胜任 的 。 后 面 几 童 会 谈 到 各 种 语言 特性 以 及 
用 它们 实现 内 散 式 DSL 的 情况 。 

2. DSL 需 要 前 期 投入 

在 项 目 中 引入 基于 DSL 的 开发 也 会 引入 前 期 成 本 。 只 有 当 模 型 的 复杂 上 度 适 中 ,这样 的 代价 才 
值得 接 有 党 。 在 开发 周期 的 后 期 阶段 ， 当 成 本 被 摊 平 之 后 ， 这 样 做 的 好 处 会 最 终 显 现 出 来 。 
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3. 使 用 DSL 可 导致 性 能 隐忧 

DSL 有 时 候 会 给 程序 市 来 性 能 隐忧 。 毕 竟 ， 它 又 增加 了 一 个 间接 层 。 作 为 项 目 经 理 ， 你 要 考 
奈 部 署 规模 、 重 用 范围 等 因素 ， 才 能 决定 是 否 采 用 基于 DSL 的 开发 。 

4. DSL 有 时 缺乏 足够 的 工具 支持 

任何 开发 方法 都 需要 充分 的 工具 支持 才能 在 程序 员 团 体 中 普及 。 工具 支 持 包 括 很 多 方面 ， 比 
如 有 无 IDE 集 成、 单元 测试 支持 、 语 言 工作 人 台 ( language workbench )、 性 能 分 析 文 持 等 。 如 果 你 
的 DSL 生 成 多 种 目标 语言 用 于 执行 ， 那 么 各 种 语言 之 间 的 互 操 作 性 也 是 一 个 潜在 问题 。 

5. “学 不 完 的 DSL” 现 象 

任何 一 种 外 部 DSL 都 要 求 开 发 者 男 外 学 习 。 内 部 DSL 只 要 求 开 发 者 学 习 它 在 现 有 箱 主 语言 < 
上 上 党 造 的 接口 。 开 发 者 经 党 对 又 要 学 习 一 种 新 语言 感觉 厌烦 ,不 仪 因 为 没完 没 了 ,还 因为 新 垣 言 
的 用 途 很 有 限 。 

6. DSL 可 导致 语言 间 的 摩擦 

通常 开发 一 个 应 用 程序 要 用 到 不 止 一 种 DSL。 当 结合 使 用 多 种 语言 时 ， 人 们 往往 担心 最 终 的 
领域 模型 不 能 保持 一 致 。DSEL 的 组 合 使 用 并 不 简单 ， 因 为 一 般 各 个 DSL 都 是 彼此 独立 地 发 展 起 来 
的 。 如 采 不 小 心 应 对 ， 语 言 的 多 样 性 可 以 导致 各 目 为 政 的 混乱 状态 。 

从 图 1-3 可 以 看 出 ，DSL 是 建立 在 实现 模型 基础 上 的 语言 学 抽象 。 你 把 领域 模型 抽象 得 越 好 ， 
网 越 容 多 在 上 面 设 计 出 目 然 的 场 言 。 我 们 来 看 看 模型 应 该 具备 什么 特质 , 才能 为 创造 一 种 军 于 表 
现 力 的 DSL 葛 定 坚实 的 基础 。 


1.7 DSL 与 抽象 设计 


本 章 前 面 ,我 用 “抽象 ”这 个 词 泛 指 来 自 领 域 、 表 现 出 一 组 联系 紧密 的 行为 的 任何 制品 。 抽 
象 只 关注 对 象 的 本 质 属性 , 不 把 任何 不 必要 的 细节 呈现 给 用 户 。 但 哪些 才 是 本 质 的 部 分 ?这 取决 
于 你 从 什么 样 的 观察 角度 去 看 待 抽 象 。 本 节 将 介绍 抽象 与 DSL 设 计 的 相关 性 ， 以 及 它 对 于 DSL 的 
表现 力 有 何 影 啊 。 

你 将 在 第 5 章 和 第 6 草 了 解 到 ,设计 得 当 的 抽象 是 搭建 DSL 的 语言 学 构造 的 基础 。 那 么 ， 怎 样 
才能 使 抽象 设计 得 当 ? 

在 评价 抽象 好 坏 的 各 种 判断 标准 中 , 我 认为 有 四 种 基本 特质 是 抽象 设计 最 应 该 具备 的 。 表 1-2 


总 结 了 这 四 种 特质 。 






























































41-2 民 好 抽象 应 具备 的 特质 











抽象 的 特质 对 设计 的 影响 
fn] 只 公开 那些 加 客户 承诺 过 的 行为 。 公 开 得 越 多 ， 越 容易 又 露 抽象 的 内 部 实现 ， 而 这 
会 为 后 面 的 工作 招致 困难 
精炼 保证 抽象 的 实现 不 包含 任何 非 本 质 的 细 市 
扩展 性 保证 抽象 设计 可 以 在 不 影响 现 有 客户 的 前 提 下 渐进 式 发 展 


组 合 性 你 所 设计 的 抽象 要 可 以 和 其 他 抽象 进行 组 合 ， 构 成 更 高 阶 的 抽象 
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怎样 设计 出 好 的 抽象 ? 这 是 万 一 个 话题 了 。 我 不 打算 在 此 讨论 得 太 话 细 ,以免 俩 离 本 章 的 主 
题 。 关 于 抽象 设计 的 详尽 内 容 参 见 附 录 A。 在 那里 , 我 会 用 大 量 真 实 示 例 深 入 分 析 表 1-2 中 列 出 的 
每 一 种 特质 。 请 读者 在 阅读 下 一 章 之 前 先 看 一 过 附 录 A。 当 你 能 够 轻松 辨别 抽象 设计 的 好 坏 时 ， 
将 更 加 了 解 好 的 抽象 设计 对 于 助力 各 种 DSL 设 计 拉 巧 发 挥 效 力 的 益处 。 











1.8 小结 


本 章 对 DSL 背 后 基本 原理 的 宛 长 介绍 至 此 接近 尾声 。 在 对 一 个 具体 领域 建 模 的 时 候 ,， 你 的 实 
现 要 用 该 领域 的 语汇 来 表达 。 有 了 共通 语汇 作为 媒介 ，DSL 可 以 把 领域 的 语法 和 语义 带 进 你 的 解 
答 模 型 。 

DSL 应 当 有 足够 的 表现 力 ， 这 要 靠 发 挥 窒 主语 言 的 威力 设计 出 恰当 的 抽象 。 抽象 的 设计 是 一 
个 迭代 过 程 ，DSL 的 设计 过 程 也 一 样 。 你 不 可 能 第 一 次 迭代 就 得 到 一 种 设计 完善 的 DSL， 它 必定 
是 经 过 开发 者 和 领域 专家 的 协作 与 努力 逐渐 形成 的 。 请 让 领域 专家 尽早 参与 开发 过 程 。 如 果 领 域 
专家 能 理解 抽象 的 含义 ， 能 验证 业务 规则 的 实现 , 那 就 证 明 你 的 模型 是 正确 的 , 而 且 具 有 足够 的 
表现 力 。 

为 卫生 的 开发 范式 打 基 础 一 向 是 个 艰辛 的 过 程 。 茶 喜 你 成 功 完成 了 任务 。 接 下 来 ,你 将 深入 
接触 现实 世界 中 的 DSL 设 计 与 实现 。 第 2 革 将 偏重 介绍 一 些 真实 存在 的 DSL， 它 们 是 用 JVM 平 台 
上 的 几 种 现代 语言 实现 的 。 这 一 部 分 内 容 首先 从 Java 开 始 讲 起 ， 然 后 是 表达 能 力 更 强 的 Groovy、 
Scala 和 Ruby。 你 会 发 现 ， 在 代表 了 当前 发 展 方向 的 几 种 编程 语言 的 帮助 下 ， 模 型 的 表现 力 会 相 
应 提高 。 敬 请 关注 ! 






































要 点 与 最 佳 买 践 
口 DSL 是 开发 者 和 业务 人 员 之 间 的 交流 媒介 。DSL 的 设计 工作 必须 有 领域 专家 参与 。 
口 DSL 不 一 定 适合 所 有 情况 。 请 在 衡量 过 各 种 有 利和 不 利 因素 之 后 ， 再 决定 是 否 投 入 设计 
Pp 
口 DSL 的 设计 过 程 必定 是 迭代 的 。 请 为 它 付 出 应 有 的 努力 。 
O 说 记 DSL 的 语法 必须 满足 最 终 用 户 对 表现 力 的 要 求 。 不 要 过 度 设计 DSL， 那 只 会 使 语法 
变 得 庞杂 并 增加 实现 的 复杂 性 。 
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现实 中 的 DSL 


本 章 内 容 

口 初试 设计 一 一 第 一 个 基于 Java 的 DSL 
a 利用 Groovy 改 善 DSL 的 表现 力 

口 DSL 的 实现 模式 

口 选择 合适 的 DSL 类 型 





在 第 1 草 里 ， 你 已 经 看 到 DSL 对 于 开发 团队 与 领域 专家 之 间 沟 通 的 改善 作用 。 我 们 还 介绍 了 
DSL 的 总 体 架 构 以 及 其 文 持 的 不 同 执行 模型 。 然 而 ， 如 果 缺 少 有 意义 的 真实 用 例 ， 空 谈 DSL 又 有 
什么 用 呢 ? 在 实际 的 项 目 中 ， 你 攒 什么 判断 设计 DSL 是 比 使 用 传统 软件 开发 模型 更 优 的 解决 方 
R? 本 章 就 问 你 揭示 真实 世界 中 的 DSL 设 计 。 

自 完 , 我们 用 一 个 局 发 性 的 DSL 示 例 演示 从 初始 设计 、 实 现 到 最 后 优化 的 真实 过 程 ; 示例 照 
旧 来 目 金 融 中 介 业 务 领域 。 我们 先 探讨 几 种 实现 , 然后 阐释 在 设计 DSL 实 现 的 过 程 中 会 遇 到 的 一 
般配 式 。 图 2-1 展 示 了 本 章 控 索 过 程 的 路 线 图 。 


把 表现 力 提 高 一 点“Groovy 实 现 的 DSL 


£. E 看 过 了 真实 的 DSL 实 现 ， 下 一 步 做 什么 ? 
< | 可 以 使 之 更 有 表现 力 并 更 简洁 吗 ? 


用 Java 完 成 的 第 一 个 DSL | 


发 据 一 些 普 遍 存 在 的 实现 模式 
o] ”我 有 疑问 ， 应 该 选择 内 部 
DSL 还 是 外 部 DSL? 


图 2-1 第 2 章 内 容 的 路 线 图 
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本 章 每 一 蔬 都 会 讨论 真实 世界 中 的 DSL 应 用 实例 , 它 可 能 以 实现 用 例 的 形式 出 现 , 也 可 能 是 
你 日 后 可 以 效仿 的 一 套 模 式 。 通 谈 本 章 ， 你 将 学 会 在 对 问题 域 建 醒 时 用 基于 DSL 的 编程 范式 思考 
问题 。 我 们 对 照 一 个 按照 典型 API 思 路 设计 的 模型 和 一 个 按照 DSL 思 路 设计 的 模型 ， 你 会 发 现 后 
者 对 于 领域 用 户 来 说 是 更 具 表 现 力 的 表达 形式 。 





2.1 打造 首 个 Java DSL 


一 例 胜 千 言 。 第 1 章 提 到 过 ,本 书 中 的 例子 主要 来 自 金 融 证 券 领 域 ， 作 为 对 实现 背景 的 交代 ， 
讲解 中 特地 对 领域 概念 给 出 注解 。( 请 务必 阅读 补充 内 容 中 给 出 的 领域 知识 。) 这 些 概 念 注解 除了 
帮助 你 理解 特定 领域 ， 还 是 你 学 习 DSL 实 现 示 例 时 的 参考 资料 ， 方 便 你 翻 查 例子 中 涉及 的 概念 。 
因为 同一 个 领域 贯穿 了 前 后 的 DSL 示 例 ， 你 可 以 不 断 完 善 和 丰富 它们 。 

在 1.3 节 , 我 们 看 到 交易 员 老 鲍 摆 弄 了 一 个 DSL 代 码 片 段 , 对 客户 交易 单 做 提交 到 交易 所 之 前 
的 各 种 处 理 。 为 了 你 即将 开发 的 第 一 个 DSL， 我 们 再 来 丰富 一 下 这 个 场景 。 

假设 你 负责 实现 一 种 用 来 处 理 交 易 单 的 DSL， 其 中 的 领域 语汇 与 老 鲍 所 用 的 差不多 。 看 过 第 
1 章 之 后 我 们 知道 ， 领 域 专家 是 推进 DSL 开 发 的 一 种 主要 驱动 力 。 如 果 有 一 种 表现 力 充分 的 DSL， 
领域 专家 就 能 够 理解 开发 团队 实现 的 业务 规则 和 逻辑 ， 能 够 在 代码 离开 开发 实验 室 之 前 进行 验 
证 ， 甚 至 可 能 会 以 DSL 用 户 的 身份 参与 编写 功能 测试 套件 。 专 家 们 丰富 的 领域 知识 可 以 保证 测试 
覆盖 巨细 摩 遗 , 不 仅 如 此 ，DSL 经 过 领域 专家 的 阅读 和 使 用 等 同 于 经 受 了 一 次 不 折 不 扣 的 可 用 性 
测试 。 刁 为 项 目 领导 者 ， 你 务必 要 及 早 安排 像 老 饱 那样 的 人 物 参与 到 开发 中 来 。 






































leo 金融 中 介 系统 ， 处 理 客户 交易 音 

第 1 章 提 过 ， 交 易 过 程 关 系 到 在 市 场 上 买 入 和 卖 出 证 券 ， 期 间 要 遵守 证 券 交 易 规 则 。 交 易 
始 自 投资 者 通过 注册 中 介 发 出 的 交易 单 指 令 , 这 里 的 中 介 可 以 是 股票 经 纪 人 、 清 算 银 行 或 者 财 
务 顾 问 。 客 户 发 出 的 交易 单 指令 一 般 会 包括 若干 信息 ， 如 打算 交易 〈( 买 入 或 卖 出 ) 哪 种 证 券 、 
多 少数 量 、 单 位 价格 等 。 这些 信 息 反 映 了 交易 双方 对 成 交 价格 所 作 的 限制 。 从 下 单 到 通知 成 交 
包括 以 下 步骤 : 

(1) 投资 者 向 中 介 下 交易 单 指令 ; 

OPERA DER AART, 

(3) X Z5 3E UT, PEAR E INAR; 

(4) 中 介 记 录 具 体 的 成 交 信息 ， 并 将 通知 转 给 投资 者 。 





假设 你 的 任务 是 实现 一 段 DSL 人 代码， 用 来 针对 具体 的 客户 指令 生成 新 的 交易 单 。 考 庸 效 言 ， 
这 种 语言 必定 由 领域 语汇 构成 ， 并 且 在 有 效 业务 规则 的 语义 约束 下 ， 人 允许 用 户 ( 团队 中 的 老 鲍 ) 
任意 组 合 交易 单 处 理 规则 。 不 必 一 开始 就 纠结 于 最 佳 的 语法 设计 , 因为 我 们 在 第 1 章 就 说 过 , DSL 
必须 迁 代 式 演进 ， 从 来 不 可 能 一 中 ! 而 就 。 接 下 来 你 会 看 到 我 们 的 交易 单 处 理 DSL 在 逐步 演进 、 通 
过 选择 不 同 的 实现 语言 可 使 其 获得 更 强 的 表现 力 ， 而 我 们 将 最 终 选择 一 种 令 老 鲍 满意 的 语言 。 虽 
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然 说 项 目的 第 一 步 不 应 该 把 目标 和 期 望 定 得 太 大 太 高 ， 但 我 们 从 第 1 草 了 解 到 ， 创 造 一 种 DSL 首 
先 必 须 在 所 有 项 目 干系 人 之 间 确 立 共 通 语汇 。 
2.1.1 确立 共通 语汇 


老 鲍 观察 了 一 下 问题 域 , 很 快 就 圈定 核心 需求 ,随后 三 两 下 总 结 出 交易 单 处 理 DSL 必 不 可 少 2 
的 语言 结构 成 分 ， 如 表 2-1 所 示 。 


表 2-1 初步 总 结交 易 单 处 理 DSL 的 语汇 








领域 概念 明 8 
() 新 交易 单 m 必须 说 明了 票据 的 名 称 


m 必须 说 明 数 量 
u 必 须 说 明 是 买 入 还 是 卖 出 
m 可 以 指定 某 交 易 单 为 “全 部 完成 或 放弃 ” Callor-none) ， 即 要 么 接受 交易 单 指定 的 全 部 交易 ， 
要 人 么 不 交易 。 不 存在 部 分 成 交 
(2) 交 易 单 报价 加 要求 指 定单 位 价格 
m 可 以 用 限 价 ( limit-price )、 限 价 收盘 价 (limit-on-close-price )、 限 价 开 盘 价 (limit-on-open-price ) 
等 形式 设 定 单位 价格 
(3) 交 易 单 定价 mu 要 求 根据 报价 方案 给 整个 交易 单 定价 
u 报价 方案 可 以 从 预 设 方案 中 选择 ， 也 可 以 由 用 户 当 场 设 定 一 个 临时 报价 方案 











有 了 这 张 语汇 表 ， 我 们 就 可 以 着 手 实 现 了 一 一 选择 Java 这 种 占据 统治 地 位 的 增 言 来 完成 第 一 
次 尝试 。Java 语 言 的 开发 者 数量 无 出 其 右 ， 不 管用 Java 开 发 什么 东西 ， 这 个 庞大 群体 都 是 潜在 的 
文 持 力量 。 除 了 动手 实现 ,我 们 还 要 探讨 Java 作 为 实现 语言 在 表现 力 方 面 的 局 限 。 老 鲍 日 告 盏 勇 
带 我 们 编写 功能 测试 和 验证 业务 规则 ， 我 们 的 实现 一 定 要 让 他 觉得 舒服 才 行 。 


























2.1.2 ”用 Java 完 成 的 首 个 实现 

Java 是 一 种 面向 对 象 ( 00 ) 语言 , 那么 设计 DSL 的 第 一 步 自然 就 是 把 封装 了 客户 交易 单 各 方 
面 属性 的 order( 交易 单 ) 抽象 表达 为 一 个 对 象 。 

1. 建立 交易 单 抽象 Order 

代码 清单 2-1 中 就 是 老 鲍 即将 用 来 处 理 新 交易 单 的 ( 用 Java 实 现 ) order 类 。 
代码 清单 2-1 为 Java DSL 设 计 得 的 交易 单 抽象 


public class Order { 








static class Builder { 
private String security; P Builder 设 计 模 式 
private int quantity; 
private int limitPrice; 
private boolean allOrNone; 
private int value; 
private String boughtOrSold; 
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public Builder() {} 
public Builder buy(int quantity, String security) { 


this.boughtOorSold = "Bought"; 
this.quantity = quantity; 
this.security = security; 


return this; 
j 
public Builder sell(int quantity, String security) { y 用 方法 链接 手法 
this.boughtOrSold - "Sold"; 实现 的 连贯 接口 
this.quantity = quantity; 
this.security = security; 
return this; 
j 
public Builder atLimitPrice(int p) ( 
this.limitPrice = p; 
return this; 
j 
public Builder allOrNone() ( 
this.allOrNone = true; 
return this; 
j 
public Builder valueAs(OrderValuer ov) { 
this.value - ov.valueAs(quantity, limitPrice); 
return this; 
j 
public Order burldi { 
return new Order (this); 
j 
j 


private final String security; 

private final int quantity; cR 
private final int limitPrice; 

private final boolean allOrNone; 


private int value; 
private final String boughtOrSold; 


private Order (Builder b) { 
security - b.security; 
quantity - b.quantity; 


limitPrice = b.limitPrice; 
allOrNone = b.allOrNone; 
value = b.value; 


boughtOrSold = b. boughtOrsold; 
j 


// 获 取 方 法 

j 

这 个 类 的 实现 代码 用 了 一 些 和 常见 的 Java 惯 用 法 和 设计 模式 来 增强 其 API 的 表现 力 。Builder 模 
式 @@ 方 便 API 的 使 用 者 分 步 完 成 交易 单 对 象 的 构造 。 该 模式 还 结合 了 连贯 接口 @ 的 设计 手法 ， 把 
领域 问题 用 更 易 读 的 方式 呈现 出 来 。( 连贯 接口 将 在 第 4 章 详细 讨论 。) 借助 一 个 可 变 的 builder 对 
象 ，order 抽 象 的 数据 成 员 获 得 了 不 可 变性 合 ， 有 利于 实现 并 发 。 使 核心 抽象 获得 不 可 变性 ， 正 
是 通过 builder 来 构造 对 象 的 一 个 正面 作用 。 
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定义 ”Builder 设计 模式 常用 于 分 步 构 造 对 象 。 它 分 离 了 对 象 的 构造 过 程 与 对 象 的 表示 ， 所 以 不 
同 的 对 象 表示 可 以 共用 同样 的 构造 过 程 。 详 情 参 见 2.6 节 中 的 文献 [5]。 


Builder 模 式 的 实现 部 分 就 说 到 这 里 ,以 后 我 们 再 回头 讨论 代码 中 存在 的 一 些 问题 。 现 在 , 我 
们 先 看 看 这 个 实现 会 给 老 鲍 市 来 什么 样 的 DSL。 

2. 构造 交易 单 

下 面 是 一 段 交 易 单 buider 的 应 用 实例 , 其 中 领域 语汇 的 密度 非 第 高 ; 示例 中 由 API 形 成 的 语言 
里 ， 儿 乎 可 以 找到 表 2-1 列 出 的 全 部 关键 字 : 


Order o = 
new Order.Builder() 
.buy (100, "IBM") 
.atLimitPrice(300) 














.allOrNone() 9 交易 单 定 价 算法 
.valueAs(new StandardOrderValuer()) 
.build(); 


虽然 我 们 的 DSL 已 经 用 了 正确 的 语汇 ， 但 本 质 上 还 是 一 段 Java 程 序 ， 仍 然 脱 不 开 Java 编 程 语 
言语 法 上 的 限制 和 珊 碎 的 缺点 。 调 用 valueAs 的 时 候 @ ,你 需要 指定 一 个 定价 算法 作为 它 的 输入 ， 
但 算法 只 能 在 当前 上 下 文 以 外 实现 。 这 是 因为 Java 不 直接 支持 高 阶 函数 ， 所 以 我 们 没 办 法 优雅 地 
就 地 定义 定价 策略 。 这 个 Java 实 现 的 用 户 只 能 预先 定义 每 一 种 交易 单 定 价 策 略 的 具体 实现 。 我 们 
把 “交易 单 定价 ”的 契约 实现 为 一 个 接口 : 

public interface OrderValuer { 


int valueAs(int qty, int unitPrice); 


} 














在 Java 中 模拟 高 阶 函 数 

虽然 Java 不 直接 支持 高 阶 函 数 ， 但 是 有 一 些 库 用 对 象 模 拟 出 这 种 特性 ， 如 lambdaj 
( http://code.google.com/p/lambdaj )、Google Collections ( http://code.google.com/p/guava-libraries ) 
feFunctional Java ( http://functionaljava.org ), JwJKJavast 4 8&2 "E.— AR, 48 SUA B x] m Dp SE 
建 模 ， 这 几 个 库 不 失 为 可 行 的 途径 。 但 这 些 库 提 供 的 选项 存在 缺点 ， 就 是 较为 烦琐 ， 而 且 优 雅 
程度 肯定 不 如 Groovy、Ruby、Scala 等 语言 直接 提供 的 语言 特性 。 





DSL 的 用 户 针 对 特定 定价 策略 分 别 定 义 该 接口 的 具体 实现 : 
public class StandardOrderValuer implements OrderValuer { 
public int valueAs(int qty, int unitPrice) { 
return unlbPrice * qty; 
j 
j 


XX IEEE BLA EI OL EAM ERAN E PUE EHE, 我 们 的 DSL 满 足 不 了 他 一 开始 提出 的 
需求 。 这 可 是 个 大 挫折 ， 毕 苋 我 们 日 训 DSL 能 让 不 异 编 程 的 领域 专家 写 出 有 意义 的 功能 测试 。 力 
外 ， 老 饱 还 对 交易 单 处 理 DSL 提 出 了 几 点 意见 ， 如 下 。 
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口 语法 烦琐 ”语言 中 含有 太 多 括号 等 令 人 眼花 综 乱 的 东西 ， 容 易 干 扰 不 懂 编 程 的 领域 专家 。 
a 语法 中 与 领域 无 天 的 复杂 性 ” 老 鲍 指 的 是 用 户 必 须 显 式 使 用 Builger 类 。 其 实 ， 去 挥 
Builder 类 这 重复 洒 性 也 能 实现 DSL， 只 要 把 order 类 的 获取 方法 都 改 成 链 式 方法 ,同样 
能 构造 出 连贯 接口 。 只 不 过 ，Builgder 类 对 抽象 设计 还 有 正面 的 影响 ， 它 促使 我 们 设计 
出 一 种 不 含 可 变 属性 的 不 可 变 抽象。 那么 , 能 不 能 从 语言 中 去 除 这 些 不 必要 的 语法 成 分 ? 
我 们 可 以 再 次 运用 抽象 手段 把 builder 隐 藏 起 来 ， 让 表面 上 的 语法 看 起 来 更 直观 : 
new Order.toBuy(100, "IBM") 
.atLimitPrice(300) 
.allorNone() 


.valueAs(new StandardOrderValuer()) 
.build(); 


这 个 取 巧 方案 仅仅 将 复杂 性 从 语法 推 到 实现 中 ， 但 毕竟 使 烦琐 的 部 分 留 在 DSL 的 实现 层面 ， 
使 用 起 来 向 洁 多 了 。 

3. 分 析 Java DSL 

对 于 代码 中 显 式 出 现 的 Builder 模 式 ，Java 程 序 员 百 分 百 认可 它 的 作用 ， 也 赞赏 它 使 API 连 贯 
流畅 这 一 点 。 如 果 DSEL 的 用 户 都 是 Java 程 序 员 ， 那 么 我 们 设计 的 这 种 基于 Java 的 DSL 还 算 令 人 满 
意 。 但 不 可 否认 ，Java 的 语法 烦琐 是 一 个 缺点 ， 我 们 可 以 选择 一 种 表现 力 更 强 ， 而 代码 更 简 清 的 
实现 语言 来 克服 这 个 缺点 。 下 面 我 们 就 来 详细 分 析 Java 人 代码， 看 看 是 Java 语 言 的 哪些 特性 导致 了 
老 鲍 不 愿 看 到 的 那些 语法 复杂 性 。 表 2-2 罗 列 了 老 鲍 报 告 的 各 种 不 足 应 该 归 答 的 Java 语 言 特性 。 


表 2-2 Java DSL 的 不 足 和 应 该 归 舌 的 Java 语 言 局 限 
DSL 的 不 足 应 该 归 和 佑 的 Java 语 言 特性 
烦琐 ( 不 必要 的 插 号 和 语法 成 分 )” 属于 基本 的 Java 语 法 
m 鸳 数 必须 带 括号 。 在 对 象 和 类 上 调用 方法 必须 用 点 号 
与 领域 无 关 的 复杂 性 m Java 不 是 一 种 可 以 自我 扩展 的 语言 。 很 多 常见 的 惯用 法 必须 通过 额外 的 间接 层 
(设计 模式 ) 来 表达 
m 抽象 设计 中 需要 构造 一 些 额 外 的 类 结构 ， 其 中 一 些 会 在 对 外 公开 的 API 里 冒 出 
头 来 ， 成 为 表面 语法 的 一 部 分 。 前 面 示例 中 的 Builger 类 就 属于 这 种 不 必要 的 
语法 障碍 
e Java 不 是 一 种 解释 语言 。 执 行 任 何 Java 代 码 片 段 都 必须 先 定 义 一 个 带 puplic 
static voidmain 方 法 的 类 。 不 管 怎么 说 ， 在 DSL 用 户 的 眼中， 这 就 是 挨 杂 进 
























































来 的 语法 品 首 
不 能 当场 定义 定价 策略 函数 Java 不 下 接 提 供 高 阶 函 数 这 种 语言 特性 





接 下 来 ,我 们 将 逐一 探索 能 满足 老 鲍 愿 望 的 各 种 改进 手段 ， 使 DSL 对 领域 专家 更 加 友好 。 


2.2 创造 更 友好 的 DSL 


DSL 的 表现 力 高 低 只 能 由 用 户 来 评判 。 老 鲍 已 经 指出 我 们 的 Java 方 案 有 好 几 个 方面 需要 改善 ， 
必须 更 贴近 问题 域 的 要 求 。 为 了 给 老 鲍 创 造 一 种 更 友好 的 DSL， 我 们 来 尝试 两 种 方案 。 其 一 是 增 
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加 一 个 XML 层 ， 把 领域 语言 外 部 化 ， 将 其 表现 为 更 适合 人 类 阅读 的 形式 。 第 二 种 方案 是 彻 抵 改 
用 一 种 表现 力 更 强 的 编程 语言 来 实现 DSL 





Groovy; 


2.2.1 用 XML 实现 领域 的 外 部 化 





业务 上 人 们 党 将 XML 用 作 标 记 语 言 ， 那 么 何不 用 它 来 设计 我 们 的 领域 语言 ? XML 有 充分 的 
工具 支持 ， 被 所 有 浏览 侨 和 IDE 认 可 ,而且 有 大 量 框架 和 库 可 用 于 解析 、 人 处理 和 查询 。 

确实 ， 领 域 专家 可 以 脱离 编程 环境 编写 XML 结构 ， 在 这 个 意义 上 讲 XML 可 外 部 化 。 但 XML 
完全 是 声明 式 的 ， 语 法 又 特别 烦琐 ， 还 很 难 表达 控制 结构 。 代 码 清单 2-1 中 的 交易 单 处 理 DSL 如 
果 用 XML 来 表述 ， 差 不 多 就 是 下 面 这 段 代码 的 样子 。 我 已 经 刻意 省 略 了 一 部 分 因为 僵 便 的 XML 
语法 造成 的 腾 肿 结构 。 


«orders 














«order» 
«buySell»buy«/buySell» 
«quantity»100«/quantity» 
«instrument»IBM«/instrument» 
«limitPrice»300«/limitPrice- 
«allOrNone»true«/allOrNone» 
«valueAs»...«/valueAs» 

«/order» 


«/orders» 

XML 本 来 不 是 用 来 编程 的 , 而 是 用 于 表达 一 种 完全 可 移植 的 文档 结构 。DSL 往 往 需要 包含 一 
些 控制 结构 ， 而 XML 很 难 优雅 地 表达 这 些 结构 。 很 多 J2EE ( 企业 版 Java 平 台 ) 框架 通过 XML 提 
供 声 明 式 配置 参数 。 但 如 果 进 一 步 将 XML 的 用 途 推 广 到 编写 业务 逻辑 和 领域 规则 ， 你 很 快 就 会 
遇 到 之 前 Java 实 现 中 存在 的 表现 力 壮 贷 。 与 其 这 样 迁 回 ， 还 不 如 就 在 我 们 朝夕 相伴 的 编程 语言 
间 寻 找 解决 之 道 。 记 住 ， 语 言 才 是 我 们 最 得 力 的 编程 工具 。 

















2.2.2 Groovy: 更 具 表 现 力 的 实现 语言 





你 现在 可 能 已 经 意识 到 ， 我 们 只 是 在 底层 实现 语言 的 能 力 范 围 之 内 设计 DSL。DSL 用 户 所 用 
的 十 言 根本 就 是 开发 者 用 来 实现 DSL 的 语言 。 老 例 针 对 我 们 的 第 一 次 尝试 指出 的 问题 其 实 都 是 
Java 编 程 语 言 的 固有 局 限 ， 不 可 能 在 DSL 实 现 中 规避 。 说 到 底 我 们 的 实现 技术 就 是 在 特 主 语言 中 
内 详 DSL， 这 一 点 已 经 在 1.7 市 讨论 DSL 的 内 部 和 外 部 分 类 时 谨 过 。 

所 以 ,我们 应 该 考虑 一 种 比 Java 表 现 力 更 强 的 语言 作为 簿 主语 言 。Groovy 编 程 语 言 运行 在 
JVM 平 台 上 ， 表 现 力 强 于 Java， 是 动态 类 型 语言 ， 还 文 持 高 阶 疯 数 。 

1. Groovy 方 案 

不 断 阅读 本 书 ， 你 会 看 到 Groovy 有 助 于 设计 更 优秀 DSL 的 各 种 语言 特性 。 下 面 来 用 Groovy 
实现 交易 单 处 理 DSL。 首 先 ， 我 们 来 看 一 段 用 Groovy 实 现 的 DSL 代 码 片段 ， 它 与 之 前 的 Java 示 例 
功能 完全 相同 : 
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newOrder.to.buy(100.shares.of('IBM')) ( 
limitPrice 300 
allOrNone true 
valueAs (qty, unitPrice -> qty * unitPrice - 500} 


) 

这 段 代 码 创建 一 个 新 的 客户 交易 单 ， 内 容 是 购买 100 股 IBM 股 票 ， 限 价 300 美 元 ， 购 买方 式 为 
全 部 完成 购买 或 全 部 放弃 ( all-or-none 模 式 )。 交易 单 定价 按照 代码 中 给 出 的 公式 计算 。 这 有 段 代码 
的 执行 结果 和 先前 的 Java 示 例 是 一 样 的 ; 不 过 ，Groovy 实 现 高 阶 抽象 的 能 力 造成 了 表现 效果 的 差 
异 。 因 为 Groovy 具 备 超凡 的 元 编程 能 力 ， 我 们 才 得 以 构造 出 像 100 .shares .of ('IBM' ) 这 样 的 
DSL 语 句 结 构 ， 创 造 出 让 领域 用 户 感 觉 更 自然 的 语言 。 代 码 清 单 2-2 中 是 用 Groovy 实 现 的 交易 单 
处 理 DSL 的 完整 实现 。 








代码 清单 2-2”Groovy 实 现 的 交易 单 处 理 DSL 


class Order { 
def security 
def quantity 
def limitPrice 
def allOrNone 
def value 
def bs 


def buy(su, closure) { 
bs = 'Bought!' 
buy. sell(su, closure) 


} 


def sell(su, closure) { 
bs = 'Sold' 
buy_sell (su, closure) 


} 


private buy_sell(su, closure) { 
security = su[0] 
quantity = su[1] 
closure ( ) 


} 


def getTo() { 
this 
} : pss 
通过 这 个 钧 子 拦截 对 
不 存在 方法 的 调用 
def methodMissing(String name, args) { 


order.metaClass.getMetaProperty(name).setProperty(order, args) 


} 


def getNewOrder() { 
order = new Order () 


i 通过 闭 包 实现 定价 
策略 的 就 地 定义 


def valueAs(closure) { 
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order.value = closure(order.quantity, order.limitPrice[0]) 


通过 元 编程 手段 
注入 新 的 方法 

Integer.metaClass.getShares = { -> delegate } 

Integer.metaClass.of = { instrument -> [instrument, delegate] } 


FERREA Groovy 3z SIS] PA, Mit AMN IRE TEAN EKM RAR HEH 
项 语言 特性 。Groovy 还 有 很 多 其 他 特性 令 它 成 为 一 种 特别 适合 用 来 实现 DSL 的 语言 , 我们 等 到 第 
4 草 和 第 5 草 再 作 全 面 介 绍 。 这 个 例子 取得 了 如 此 出 色 的 表现 效果 ， 我 们 看 看 这 应 该 归功 于 哪些 
Groovy 特 性 吧 。 

2. 通过 methodMissing 动 态 合成 新 方法 

Groovy 人 允许 调用 不 存在 的 方法 ， 而 methodMi ssing 作 为 钧 子 拦截 所 有 这 类 调用 @。 对 于 交 
易 单 处 理 DSL， 每 当 调 用 1imitPrice、alLorNone 等 方法 ， 这 类 调用 都 会 被 methodqMiss ing 
TUR RE. JPARCPEHÉONSIHOraer RE EWR. methodMissinog4f4 T BEBE b RIX 
AER ASTE, Jon mE Xn] EAST 27 05 V8] HI o 

3. Groovy 元 编程 技术 之 动态 方法 注入 

我 们 通过 元 编程 技术 癌 Integer 内 置 类 注入 了 符 干 方法 , 起 到 了 增强 场 言 表现 力 的 效果 。 注 
人 的 getshares 方 法 为 Integer 类 增加 了 一 个 名 为 shares 的 属性 ， 为 构造 自然 流畅 的 DSL 提 供 
了 非常 有 用 的 语言 成 分 合 。 

4. 直接 支持 高 阶 函 数 和 闭 包 

这 可 能 是 令 Groovy 等 语言 在 DSL 表 现 力 上 压倒 Java 的 最 重要 的 声言 特性 。 差 别 非 常 显 兰 ， 只 
要 比较 一 下 Groovy 和 Java 版 本 中 的 valueAs 方 法 调用 人 @ 就 能 领会 。 

现在 Groovy DSEL 的 实现 和 应 用 代码 都 已 就 绪 ， 但 还 差 一 个 机 制 将 它们 集成 在 一 起 ， 而 且 需 
要 建立 一 个 能 运行 任意 DSL 代 码 的 执行 环境 。 我 们 来 看 看 怎么 做 。 


























2.2.3 ”执行 Groovy DSL 


Groovy 具 备 执 行 脚本 的 能 它 的 解释 硕 可 以 执行 任意 Groovy 代 三 o 你 可 以 利用 这 一 点 为 交 
易 单 处 理 DSL 建 立 一 个 交互 式 的 执行 环境 。 我 们 需要 把 DSL 的 实现 (代码 清单 2-2 ) 保存 成 
ClientOrder.groovy 文 件 ， 把 应 用 代码 保存 成 男 一 个 文本 文件 order.dsl。 注 意 ， 我 们 要 保证 两 
者 的 路 径 都 在 classpath 中 ， 然 后 癌 Groovy 解 释 右 输入 下 面 的 脚本 : 


def dslDef = new File('ClientOrder.groovy').text 
def dsl = new File('order.dsl').text 
det script = "4 

$s {dslDef} 

$s {dsl} 





new GroovyShell().evaluate(script) 


在 核心 应 用 程序 中 集成 DSL 
本 节 中 的 示例 只 介绍 了 一 种 集成 DSL 实 现 和 DSL 应 用 程序 代码 的 方式 。 我 们 将 在 第 3 章 讨 
论 于 核心 应 用 程序 中 集成 DSL 时 介绍 更 多 集成 方法 。 
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该 示例 使 用 字符 串 拼 接 方式 来 生成 最 终 的 执行 脚本 。 这 样 的 做 法 有 个 缺点 ， 即 如 果 执 行 中 
出 现 错 误 ， 栈 跟踪 信息 中 报告 的 行 号 会 对 不 上 源 文件 order.dsl 中 的 行 号 。 再 次 重申 ，DSL 的 建 
立 和 与 应 用 程序 的 集成 是 一 个 迭代 过 程 。 第 3 章 会 探讨 在 应 用 程序 中 集成 GroovyDSL 的 另 一 方 
法 ， 然 后 会 对 此 进行 改进 。 





WAR! 你 已 经 成 功 设 计 并 实现 了 一 种 令 领 域 用 户 满意 的 DSL。 基 于 Groovy 的 交易 单 处 理 
DSL 充 分 满足 了 对 表现 力 的 要 求 ， 远 胜 于 之 前 的 Java 版 本 。 更 重要 的 是 ， 你 现在 知道 设计 DSL 是 
个 从 代 过 程 ,假如 当初 没有 开发 Java 版 本 , 你 会 很 难 想象 实现 语言 的 表现 力 会 有 如 此 重要 的 影响 。 


， 除 了 Groovy， 还 有 其 
实现 ， 你 会 发 现 罕 主语 


本 书 第 二 部 分 ( 第 4 章 ~ 第 8 章 ) 将 介绍 各 种 DSL 实 现 语 
他 JVM 语 言 ， 如 Scala、Clojure 和 JRuby。 对 比 不 同 的 语 
言 的 特性 差异 造就 了 多 种 多 样 的 DSL 实 现 技术 。 


从 头 到 尾 实现 了 一 种 DSL 来 解决 黄 实 案例 , 相信 你 已 经 全 面 了 解 了 如 何 通 过 一 连 串 的 去 无 存 
青 过 程 ， 步 步 为 音 地 完善 实现 。Groovy 实 现 最 终 被 证 明 可 以 满足 用 户 对 表现 力 的 要 求 , 但 良好 的 
表现 力 可 以 归功 于 哪些 底层 实现 技术 呢 ? 

为 内 部 DSL 选 择 适 当 的 实现 二 言 , 你 可 以 至 受 一 些 实现 手段 上 的 便利 。 只 有 灵活 运用 答 主 语言 
的 惯用 法 和 从 语言 特性 中 衍生 的 便利 技术 , 你 才能 把 答 主 语言 塑造 成 优秀 的 DSL。 我 们 在 实现 中 利 
用 了 Groovy 提 供 的 一 些 技术 , 但 并 非 所 有 DSL 部 相似 。 任 何 语言 部 有 一 定 的 设计 模式 ,它们 依赖 于 
整体 开发 环境 下 的 各 种 约束 条 件 ， 如 实现 平台 、 团 队 成 员 的 核心 技能 、 应 用 程序 的 总 体 染 构 等 。 

下 一 市 ， 我 们 束 来 看 看 DSL 的 一 些 实现 模式 。 模 式 束 像 现 成 的 设计 知识 ,你 可 在 日 己 的 实现 
工作 中 重用 ， 利 用 它们 发 气短 主讲 言 的 力量 去 创造 友好 的 DSL。 你 将 会 了 解 到 ,无 论 内 部 DSL 还 
是 外 部 DSL, 它们 都 在 具体 的 实现 条 件 下 表现 出 五 花 八 门 的 模式 。 虽然 你 不 可 能 在 每 一 种 语言 中 
都 实现 所 有 这 些 模式 ， 但 必须 全 面 地 午 握 它们 ， 这 样 才能 针对 实现 平台 作出 最 有 利 的 选择 。 


2.3 DSL 实现 模式 


DSL 开 发 实践 中 存在 数量 众多 的 架构 模式 ， 人 简单 地 把 DSL 按 内 部 或 外 部 分 类 实在 过 于 宽泛 。 
内 部 DSEL 的 共性 是 都 建立 在 宿主 语言 之 上 。 外 部 DSL 的 共性 是 都 重新 建立 一 套 语言 设施 。 起 源 上 
的 共性 并 不 足以 全 面 刻 画 DSL 分 类 体系 。 我 们 从 第 1 章 看 到 ，DSL 是 一 系列 优秀 抽象 设计 原则 的 
化 身 。 而 设计 优秀 的 抽象 ,不 仅 需要 考虑 各 构成 元 素 在 形式 上 的 共性 ,还 要 考虑 每 个 元 素 展现 出 
来 的 差异 性 。 

接 下 来 ,我 们 将 展示 一 些 体现 了 差异 性 的 实现 模式 。 即 使 是 同一 类 别 的 DSL 也 存在 多 种 多 样 
的 架构 模式 ,只 有 了 解 它 们 ,你 才能 更 好 地 针对 DSL 和 需求 找到 合适 的 具体 实现 架构 。 对 那些 一 再 
出 现 的 模式 发 据 得 越 多 ， 你 越 容 易 重 用 自己 的 抽象 。 本 书 附录 A 讨论 过 这 样 的 抽象 设计 原则 ， 即 
当 抽 象 可 以 被 重用 时 ， 用 它们 设计 出 来 的 语言 也 会 更 容易 扩展 。 如 果 你 还 没有 读 过 附录 A ， 请 务 
必 现 在 翻 看 。 附 录 A 中 的 知识 对 于 本 书后 面 的 学 习 历 程 是 很 有 帮助 的 。 
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2.3.1 ”内 部 DSL 模 式 : 共性 与 和 关 异 性 


内 部 DSL 其 实 随处 可 见 。 像 Ruby 和 Groovy 这 类 语言 既 有 灵活 而 简洁 的 语法 , 又 有 强大 的 元 编 
程 模型 , 在 声言 的 强力 文 持 下 , 在 用 它们 写成 的 软件 中 几乎 都 可 以 找到 DSL 的 号 影 。 所 有 内 部 DSL 
部 有 个 共同 模式 ,它们 总 是 在 现 有 笨 主 语言 之 上 实现 的 。 提 到 内 部 DSL 的 时 候 我 更 喜欢 说 成 内 髓 
DSL， 因 为 这 可 以 突显 它 的 一 个 架构 特征 。 如 果 用 不 同 的 方式 去 运用 答 主 语言 提供 的 设施 ， 你 创 
作出 来 的 DSL 也 会 在 形式 、 结 构 、 灵 活性 和 表现 力 等 方面 表现 出 差异 。 

内 部 DSL 主 要 有 如 下 两 种 形态 。 

口 生成 式 “” 领域 专用 的 结构 体 经 过 编译 时 宏 、 预 处 理 需 或 某 种 运行 时 MOP ( Meta-Object 

Protocol， 元 对 象 协议 ) 的 转换 生成 实现 声言 的 代码 。 

口 内 藤 式 ”领域 专用 的 类 型 内 般 于 和香 主语 言 的 类 型 系统 。 

即使 这 么 细 分 也 免不了 有 模 楼 两 可 的 情况 。 比 如 Ruby 及 其 Web 框 架 Rails。Rails 是 一 种 用 Ruby 
语言 写成 的 内 部 DSL， 可 以 说 Rails 内 误 于 Ruby。 但 同时 Rails 又 运用 了 Ruby 的 元 编程 能 力 ， 以 便 
在 运行 时 生成 大 量 代 码 ， 所 以 它 又 是 生成 式 的 。 

还 有 一 类 静态 类 型 语言 单纯 将 DSL 内 骸 于 窒 主 语言 的 类 型 系统 ，Haskell/ 和 Scala 是 其 中 的 代 
表 。 在 这 样 的 语言 中 ，DSL 继 承 了 答 主 类 型 系统 的 全 部 能 力 。 男 外 ，Haskell 有 一 种 语言 扩展 
( Template Haskell ) 为 语言 增加 了 生成 式 能 力 ， 而 这 是 通过 宏 来 实现 的 。 

仪 在 内 部 DSL 这 一 类 别 下 就 有 数量 众多 的 不 同形 态 模 式 , 有 的 语言 还 同时 支持 多 种 DSL 开 发 
范式 。 图 2-2 展 示 了 内 部 DSL 的 一 个 分 类 图 谐 ， 并 且 在 每 一 种 模式 劳 边 标注 了 文 持 它 的 一 些 语 言 。 


灵巧 API (Java, Ruby: ) 


nne (|  Gava. Ruby. Goge 


DS ZU PT (Haskell, Scala.. ) 
反射 式 元 编程 (Ruby. Groovy: ) 


生成 式 编译 时 元 编程 (Lisp, Template Haskell.……: ) 
运行 时 元 编程 “| (Ruby. Groovy) 


图 2-2 ”内 部 DSL 的 各 种 实现 模式 ， 不 太 严 谨 的 分 类 
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下 面 我 们 就 参考 图 2-2 逐 一 介绍 这 些 常 见 的 内 部 DSL 实 现 手 段 。 


第 4 草 和 第 5 草 可 作为 本 节 材 料 的 补充 阅读 ， 这 两 草 将 更 加 详细 深入 地 阐释 DSL 的 
模式 与 实现 。 


1. 灵巧 API 

灵巧 API( Smart API ) 可 能 是 最 简单 也 最 常见 的 DSL 实 现 技术 。 这 种 技术 的 基础 是 方法 串联 ， 
近似 于 实现 Builder 模 式 (参见 2.6 节 文献 [1] )。Martin Fowler 将 灵巧 API 称 作 连 贯 接口 ( http://www. 
martinfowler.com/bliki/FluentInterface.html )。 在 这 种 模式 下 ， 你 所 创建 的 API 会 按 (要 建 模 的 ) 领 
域 动作 的 自然 序列 串联 起 来 。 环 环 相 扣 的 动作 自然 产生 连贯 接口 ,而 具有 领域 含义 的 方法 名 可 以 
方便 领域 用 户 的 阅读 和 理解 。 下 面 的 代 人 码 片 段 来 自 Guice API ( http://code.google.com/p/ 
google-guice/ ),， 它 是 谷歌 开发 的 一 个 依赖 注入 ( DI ) 框架 。 假设 用 户 打算 声明 一 个 应 用 模块 ,把 
一 个 具体 实现 绑 定 到 某 Java 接 口 , 用 Guice API 写 出 来 就 是 下 面 这 样子 ， 它 看 起 来 流畅 自然 ， 而 且 
清楚 地 表达 了 用 例 的 意图 : 


























binder.bind(Service.class).to(Servicelmpl.class).in(Scopes.SINGLETON) 


图 2-3 表 现 了 API 一 环 套 一 环 的 样子 ， 调 用 得 到 的 返回 对 象 立 刻 又 在 其 上 发 出 另 一 个 调用 。 
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图 2-3 ”以 方法 串联 手法 实现 的 灵巧 API。 方 法 调用 一 个 接 一 个 ， 并 下 到 最 后 才 返 回 给 客户 


通过 方法 串联 手法 ， 我 们 利用 宿主 语言 的 设施 和 领域 语汇 完成 了 灵巧 API 的 构造 。 但 这 种 手 
法 有 个 缺点 ， 它 很 容易 导致 大 量 可 能 没有 太 大 独立 存在 意义 的 小 方法 。 而 且 , 不 见得 所 有 的 用 例 
都 适合 用 连贯 接口 实现 。 大 通过 Builder 模 式 增 量 构造 并 配置 对 象 , 一 般 方法 串联 的 建 模 方 式 表现 
效果 最 好 ,2.1 广 中 用 Java 实 现 的 交易 单 处 理 DSL 就 是 很 好 的 例子 。 不 过 在 Groovy、Ruby 等 语言 中 ， 
由 于 其 提供 了 “命名 参数 ”特性 ，Builder 模 式 和 连贯 接口 显得 有 些 多 余 。( Scala 2.8 也 文 持 市 默认 
值 的 命名 参数 。) 举 个 例子 ， 刚 才 那 段 Java 代 码 如 末 改 成 Groovy 版 本 ， 只 是 混用 一 般 的 参数 和 命 
名 参数 而 已 ， 代 码 立 即 就 简洁 了 许多 ， 但 表现 力 一 点 都 不 输 原 来 的 版 本 : 

binder.bind Service, to: ServiceImpl, in: Scopes.SINGLETON 

灵巧 API 是 内 部 DSL 常 用 的 一 种 模式 。 具 体 的 实现 取决 于 所 用 的 语言 。 这 里 有 个 需要 牢记 的 
"EX: 实现 DSL 横 式 的 时 候 ， 应 该 总 是 选择 最 合乎 语言 习惯 的 实现 手法 。 第 4 章 讨论 到 连贯 接口 
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在 内 部 DSL 实 现 中 的 作用 时 ,我 还 会 针对 这 个 主题 补充 更 多 的 例子 和 不 同 的 实现 方式 。 现 在 ,我 
们 接着 看 下 一 个 模式 。 

2. 语法 树 操控 

语法 树 操 探 也 是 用 来 实现 内 部 DSL 的 一 种 手段 。 它 按照 Interpreter 模 式 〈 人 参见 2.6 节 文献 1 )， 
利用 答 主 语言 的 设施 来 生成 并 操控 AST (Abstract Syntax Tree， 抽 和 象 语法 树 )。AST 产 生 之 后 ， 开 
发 者 在 语法 树 上 授 历 ， 安 插 、 修 改 AST 的 结构 ， 把 根据 领域 逻辑 希望 得 到 的 代码 反映 在 AST 的 结 
构 上 。Groovy 和 Ruby 都 提供 了 这 方面 的 设施 ， 可 以 通过 库 来 操作 AST 以 生成 代码 。 

你 有 没有 想起 来 ， 这 种 实现 手段 其 实 是 Lisp 语 言 天 生 就 具备 的 能 力 。 在 Lisp 语 言 里 ， 每 个 程 
厅 都 是 一 个 列表 结构 ， 而 这 些 列表 结构 就 是 程序 员 可 以 操控 的 AST。Lisp 宏 所 做 的 事情 归根 结 抵 
就 是 通过 操控 AST 来 生成 代码 。 程 序 员 可 以 用 这 种 手段 扩展 Lisp 语 言 的 核心 语法 。 

3. RAHE AER 

以 元 编程 为 基础 的 DSL 实 现 模式 依靠 代码 生成 技术 保持 语言 界面 的 抽象 层次 , 使 之 精确 地 满 
足 领域 要 求 。 但 如 条 选用 的 箱 主 语言 不 文 持 任何 形式 的 元 编程 ， 该 怎么 办 ? 在 设计 DSL 的 时 候 ， 
你 必须 秉持 极 简 的 方针 以 决定 哪些 东西 可 以 作为 专用 语法 展现 给 用 户 ， 这 是 极 重 要 的 设计 要 求 。 
和 欠 主 语言 的 设施 提供 的 抽象 手段 越 多 ， 开 发 者 越 容 易 实 现 极 价 的 目标 。 

静态 类 型 语言 把 类 型 作为 对 领域 语义 的 一 种 抽象 手段 ， 同 时 使 DSL 的 表面 语法 简洁 精炼 。 这 
种 方式 不 通过 生成 代码 来 表达 领域 行为 , 而 是 以 答 主 语言 的 类 型 和 操作 为 载体 定义 并 实现 领域 专 
用 类 型 。 这 些 专 用 类 型 即 构 成 用 户 面 对 的 DSL 语 言 界面 ; 注意 ， 用 户 并 不 在 意 类 型 背后 的 具体 实 
现 。 类 型 化 的 模型 在 一 定 程 度 上 隐 式 地 保证 了 编程 模型 的 一 致 性 。 图 2-4 简 单 说 明了 类 型 市 给 DSL 
的 好 处 。 















































2-------------------------------------------------------- 一 


按照 领域 抽象 的 关系 设计 类 型 层次 结构 


Dl 








一 致 性 检查 
目 动 强制 施行 的 类 型 约束 


针对 领域 对 象 的 安全 检 
查 ， 防 止 无 效 的 操作 





图 2-4 ”和 藤 入 了 类 型 约束 的 DSL 在 很 多 方面 隐 式 地 保证 一 臻 性。 请 用 类 型 对 DSL 抽 象 建 
模 。 在 类 型 中 定义 的 约束 条 件 目 动 获得 编译 带 的 检查 ， 检 查 甚 至 发 生 在 程序 运 
行 之 前 
这 种 模式 的 最 大 优点 在 于 : 因为 DSL 的 类 型 系统 内 骨 于 征 主语 言 的 类 型 系统 ， 所 以 其 类 型 系 
统 会 自动 获得 宿主 语言 编译 器 的 语法 检查 。DSL 的 用 户 也 可 充分 利用 IDE 集 成 的 各 种 宿主 语言 功 
能 ， 诸 如 智能 提醒 、 代 码 补 全 、 重 构 等 。 
下 面 的 Scala 示 例 是 对 Trade 抽 象 的 建 模 。 该 示例 中 ，Trade、Account 和 Instrument 都 是 
封装 了 业务 规则 人 @@ 的 领域 专用 类 型 @。 在 Ruby 或 Groovy 里 面 ， 领 域 行为 借 由 生成 额外 代码 实现 ; 
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在 Scala 里 面 ， 类 似 的 语义 实现 于 类 型 载体 之 上 ， 并 由 编译 需 保 障 一 致 性 。 
trait Trade { 
type Instrument 


type Account e 对 领域 类 型 的 抽象 


def account: Account 
def instrument: Instrument 


9 对 领域 操作 的 抽象 
def valueOf(a: Account, i: Instrument): BigDecimal 

def principalOf: BigDecimal 

def valueDate: Date 

5133 
j 


Haskell fllScala& i8 ri EAR ra s 2S EBEZJ. TRES RI LATE LB RAUS GP HN 
DSL， 无 需求 请 于 代码 生成 、 预 处 理 融 或 者 寡 技 术 。DSL 用 户 可 以 通过 语言 本 身 实 现 的 组 合子 ， 
把 类 型 化 的 抽象 组 织 成 DSL 语 句 。 这 类 语言 的 类 型 系统 拥有 一 些 高 级 功能 ， 比 如 文 持 类 型 推导 、 
高 阶 抽 象 等 ， 可 使 语言 简洁 又 不 失 表 现 力 。Paul Hudak 在 1998 年 即 用 Haskell 语 言 演示 过 这 种 DSL 
实现 方式 ( 参见 2.6 市 文献 [2] )， 当 时 他 用 Monad 化 的 语言 解释 融 设 计 、 部 分 求 值 技术 和 多 阶段 编 
f£ (staged programming ) 技术 来 实现 可 以 增 量 式 演进 的 纯 内 和 通 式 DSL。Christian Hofer 等 人 也 在 
2.6 贡 文献 [3] 中 讨论 了 Scala 的 类 似 实 现 ， 甚 至 还 论 及 如 何 巧妙 利用 traits 、 虚 类 型 、 高 阶 泛 型 、 族 
多 态 等 Scala 特 性 在 单一 DSL 界 面 下 “多 态 地 ” 明 和 多 个 实现 。 在 第 6 草 ， 我 将 用 一 些 实现 范例 说 
明 Scala 的 静态 类 型 对 于 设计 纯粹 的 EDSL ( Embedded Domain-Specific Language, VJ S, 
用 语言 ) 的 帮助 。 




















定义 ”Monad 代 表 一 种 经 由 Haskell 语 言 得 到 推广 的 计算 模型 .Monad 让 你 按照 预定 义 的 规则 去 构 
建 抽象 。 第 6 章 在 讲述 用 Scala 实 现 DSL 的 内 容 时 会 探讨 Monad 化 的 程序 结构 。 更 详细 的 定 
3 38 A P http://en.wikipedia.org/wiki/Monad (functional programming). 








接 下 来 要 讲述 的 几 种 津 见 DSL 实 现 模 式 都 属于 元 编程 模式 , HESCREHB HEIC E T LEUR 
关 。 在 不 同 的 DSL 实 现 搁 术 中 ， 大 论 定制 DSL 语 法 的 能 力 ， 元 编程 可 谓 当 仁 不 让 。 

4. 反射 式 元 编程 

有 些 模式 针对 小 范围 的 局 部 实现 ， 比 如 灵巧 API。 而 针对 大 范围 的 一 般 实 现 策略 ， 也 有 一 些 
FEINA DE o 后 一 类 模式 不 但 对 实现 的 整体 结构 有 决定 性 影响 , 而且 本 吴 就 是 箱 主 语言 的 关键 
特性 。 回 顾 我 们 讨论 内 部 DSL 实 现 模 式 的 过 程 ( 参见 图 2-1 所 示 的 路 线 图 )， 元 编程 的 概念 一 再 以 
各 种 面目 现 身 于 DSL 设 计 之 中 。 其 中 一 种 形态 一 一 反射 式 元 编程 一 一 正 是 我 们 这 一 他 所 要 讨论 的 
模式 。 

假设 你 要 设计 一 种 DSL 用 来 谈 取 配置 文件 ,然后 根据 配置 内 容 动 态 地 调用 和 右 干 方法 。 下 面 是 
真实 的 Ruby 示 例 ， 它 从 一 个 YAML 文 件 读 取 方 法 的 名 称 和 人 参数， 然后 用 读 到 的 参数 动态 地 调用 
JA: 
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YAML.load file(x path).each do |k, v| 
foo.send("t(k)", v) unless foo.send(k) 
end 


因为 下 到 运行 时 才能 得 知 方法 名 称 ， 我 们 要 用 到 Ruby 的 元 编程 能 力 ， 通 过 object#send () 
语法 动态 地 加 对 象 发 出 消息 , 这 有 别 于 一 般 静 人 态 方 法 调用 的 点 符号 语法 。 这 里 所 用 的 编码 技巧 就 
叫 反射 式 元 编程 ;Ruby 在 运行 时 获知 方法 ， 然 后 调用 。 在 DSL 实 现 中 处 理 动态 对 象 的 时 候 ， 你 就 
可 以 利用 这 种 技巧 推迟 方法 调用 ， 直 到 从 配置 文件 等 途径 收集 到 全 部 所 需 信息 。 

5. 运行 时 元 编程 

反射 式 元 编程 只 能 发 现 运 行 之 前 已 经 存在 的 方法 , 不 过 有 的 元 编程 形式 能 够 在 运行 期 间 动 态 
地 生成 新 代码 。 运 行 时 元 编程 也 是 精简 DSL 表 面 语法 的 一 个 途径 。 它 使 DSL 外 观 上 显得 轻巧 ， 把 
费力 的 代码 生成 工作 被 转移 到 箱 主 语言 的 后 端 设 施 去 处 理 。 

有 些 语言 会 将 它们 的 运行 时 基础 组 件 骏 露出 来 , 使 之 成 为 程序 员 可 以 操控 的 元 对 和 象 。 在 Ruby 
或 Groovy 语 言 中 , 程序 可 以 利用 这 些 组 件 在 运行 时 动态 改变 元 对 象 的 行为 , 或 者 注入 新 行为 去 实 
现 领域 结构 。 图 2-$ 简 单 说 明了 Ruby 和 Groovy 中 元 编程 的 运行 时 行为 。 









































对 象 
对 象 可 以 得 到 : 
。 新 的 方法 
。 新 的 属性 
。 修改 过 的 属性 
支持 元 编程 的 语 
元 对 象 言 运行 时 平台 








图 2-5 ” 文 持 运行 时 元 编程 的 语言 允许 代码 一 边 生 成 一 边 执行 。 生 成 的 代码 可 以 修改 已 
有 的 类 和 对 象 ， 动 态 地 增加 新 行为 





我 们 在 2.1 闻 用 Groovy 开 发 过 交易 单 处 理 DSL， 当 时 就 用 到 了 这 里 所 说 的 运行 时 元 编程 技术 
在 内 置 类 Integer 上 增加 新 方法 shares 和 of。 实 际 上 对 于 DSL 打 算 执行 的 动作 语义 ， 这 两 个 方 
法 并 没有 任何 实质 意义 。 它 们 只 起 到 一 种 连结 作用 ， 目 的 是 让 语言 更 贴近 建 模 领 域 。 图 2-6 是 一 
段 用 Groovy 实 现 的 DSL 语 句 ， 图 上 为 这 一 串 连续 调用 的 方法 标注 了 每 个 方法 的 返回 类 型 。 新 生成 
的 方法 贯穿 于 语句 中 间 ， 大 大 改善 了 语言 的 表达 能 力 ， 这 些 都 是 运行 时 元 编程 的 效 采 。 

Rails 和 Grails 是 两 个 特别 强大 的 Web 开 发 框 染 ， 它 们 都 借助 了 运行 时 元 编程 的 力量 。 在 Rails 
中 ， 你 只 要 写 下 下 面 的 代码 ，Ruby 的 元 编程 引擎 会 根据 Employees 表 的 定义 生成 所 有 相关 的 关 
系 模型 及 验证 逻辑 代码 。 
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class Employee < ActiveRecord::Base { 
has many :dependants 
belongs to :organization 
validates presence of :last name, :title, :date of birth 


# .. 
} 


order string 


| | 


newOrder.to.buy(100.shares.of('IBM!)) 
EL 3 f| e —— JE | 


order integer integer X [string, integer] 


order 


[string, integer] 
图 2-6 ”通过 运行 时 元 编程 获得 丰富 的 领域 语法 


运行 时 元 编程 通过 在 运行 时 阶段 生成 代码 使 DSL 动 态 化 。 不过, 还 有 男 一 种 形态 的 代码 生成 
拉 术 ,， 它 发 生 在 编译 阶段 ， 因 而 不 会 给 运行 时 增加 任何 人 额外 开销 。 下 面 我 们 要 讨论 的 DSL 模 式 束 
是 编译 时 元 编程 ， 这 种 模式 大 多 出 现 于 Lisp 语 言 家 族 。 

6. 编译 时 元 编程 

右 采 用 编 详 时 元 编程 ,我 们 可 以 为 DSL 加 上 定制 请 法, 这 扣 跟 刚刚 讨论 过 的 运行 时 元 编程 很 
像 。 虽 然 两 种 模式 有 相似 的 地 方 ， 但 也 存在 春天 键 的 区 别 ， 请 看 表 2-3。 


表 2-3 ”编译 时 元 编程 与 运行 时 元 编程 的 对 比 
编译 时 元 编程 运行 时 元 编程 
开发 者 定义 的 语法 在 运行 时 之 前 、 编 译 阶 段 得 到 处 理 。 开发 者 定义 的 语法 在 运行 时 期 间 经 过 元 对 象 协 议 (MOP ) 处 理 
没有 运行 时 的 额外 开销 ,因为 到 达 运 行 时 平台 的 部 是 正 ”有 一 定 程 度 的 运行 时 开销 ， 因 为 要 处理 元 对 象 和 生成 代码 
党 形式 的 程序 









































在 编 详 时 元 编程 的 典型 实现 中 ， 用 户 通 过 与 编 详 肖 的 交互 在 编译 阶段 生成 程序 片段 。 


A 宏 是 最 常见 的 一 种 编译 时 元 编程 实现 途径 ,4.5 节 将 通过 Clojure 示 例 深入 解释 编译 
时 元 编程 的 工作 原理 。 


C 语 言 中 基于 预 处 理 带 的 安 ， 还 有 C++ 语言 中 的 模板 ， 都 是 能 在 编译 阶段 生成 代 但 的 语言 基 
而 结构。 不 过 ， 如 果 追 溯 编 程 语言 的 历史 ，Lisp 才 是 编译 时 元 编程 的 鼻祖 。C 语 言 宏 是 在 词法 层 
面 上 进行 文本 蔡 换 操作 。 而 Lisp 安 直接 对 AST 操 作 ， 在 句法 层面 上 提供 了 极 强 的 抽象 设计 能 
从 图 2-7 中 的 示意 图 可 知 ， 开 发 者 定制 的 DSL 专 用 语法 经 过 宏 展 开 阶 段 的 处 理 变 成 普通 的 代码 成 
分 ， 然 后 被 转发 给 编译 硕 。 

本 章 对 内 部 DSL 实 现 模式 的 讨论 到 此 为 止 。 我 们 介绍 的 几 种 元 编程 方式 主要 见于 Ruby、 
Groovy、Clojure 等 动态 语言 。 男 外 ， 我 们 介绍 了 议 态 类 型 化 技术 ， 以 及 它 对 于 设计 类 型 安全 的 
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正常 形式 的 代码 
DSL 脚本 
X 送 去 编译 
在 此 定义 专用 
的 定制 语法 


宏 展开 
图 2-7 用 宏 来 实现 编译 时 元 编程 。DSL 脚 本 中 有 一 部 分 是 普通 的 答 主 语言 成 分 ， 有 一 
部 分 是 开发 者 定制 的 专用 语法 。 定 制 部 分 以 宏 的 形式 出 现 ， 在 安 展开 阶段 展开 
成 正 第 的 语言 形式 。 然 后 ， 所 有 代码 被 一 起 送 给 编译 靛 


本 章 一 开头 我 们 就 承诺 过 要 探讨 现实 中 的 DSL 设 计 。 前 面 已 经 讨论 过 用 Java 和 Groovy 完 成 的 
DSL 实 现 ， 刚 刚 又 介绍 了 内 部 DSL 实 现 中 出 现 的 模式 。 每 个 模式 部 是 实践 者 应 该 勇于 重用 的 经 验 
厂 段 。 所 有 这 些 模 式 孝 是 在 现实 的 DSL 开 发 中 成 功 实 践 过 的 。 

说 完 内 部 DSL， 显 然 接 下 来 我 们 就 要 说 外 部 DSLT 了 。 假 如 宿主 语言 无 法 实现 你 想 要 的 DSL 语 
法 形态 ， 那 承 应 该 跳 脱 千 主语 言 的 树 梅 ,不惜 选择 需要 从 零 开始 的 实现 途径 。 外 部 DSL 正 是 正确 
答案 。 接 下 来 ， 我 们 就 来 看 看 外 部 DSL 有 哪些 实现 模式 。 


2.8.2 ”外 部 DSL 模 式 : 共性 与 专 异 性 


外 部 DSL 的 设计 周期 和 原则 与 通用 语言 设计 相同 。 我 知道 这 个 说 法 肯定 让 你 望 而 生 旦 ， 甚 至 
打消 你 在 项 目 中 设计 外 部 DSL 的 念头 。 这 句 论 断 在 理论 上 完全 成 立 ， 只 不 过 DSL 的 语法 和 语义 并 
不 需要 像 通 用 编程 语言 那么 复杂 ,所 以 其 实 没有 那么 吓人 。 在 现实 中 , 我 们 可 能 只 需要 动用 正则 
表达 式 来 操控 一 下 字符 串 ， 就 足以 实现 外 部 DSL 的 处 理 。 不 论 简 单 还 是 复杂 ， 总 之 所 有 外 部 DSL 
的 共同 特征 就 是 其 实现 不 借助 宿主 语言 的 设施 。 

外 部 DSL 的 处 理 过 程 可 以 粗略 分 为 两 个 阶段 ， 如 图 2-8 所 示 。 

OHI ”对 输入 的 文本 进行 分 词 ， 通 过 解析 器 识别 有 效 的 输入 。 

Ql 解析 器 识别 出 的 有 效 输入 在 此 接受 处 理 。 

如 果 DSL 比 较 简 单 ， 解 析 器 可 以 就 地 完成 加 工 工作 ， 那么 两 个 阶段 可 以 合 二 为 一 。 不过， 一 
般 而 言 比较 实际 的 做 法 是 让 解析 恬 把 输入 文本 转换 成 一 种 中 间 表 示 。 根据 具体 情况 以 及 DSL 的 复 
琳 程 度 ， 这 种 中 则 表示 可 以 是 AST, 也 可 以 是 其 他 更 复杂 的 语言 元 模型 。 解 析 融 本 喘 的 复杂 程度 
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也 不 同 ， 人 简单 的 只 是 字符 串 人 处 理 而 已 ， 复杂 的 也 许 要 用 到 精密 的 语法 制导 翻译 ( syntax-directed 
translation ) 技术 ( 这 种 解析 技术 将 在 第 8 章 讨论 )， 需 要 动用 YACC 和 ANTLR 等 “解析 需 生 成 器 ” 
来 制作 。 加 工 阶段 围 比 中 间 表 示 来 进行 ,可 以 直接 从 中 间 表 示 生 成 目标 输出 ,也 可 以 将 之 转化 为 
一 种 内 部 DSL， 然 后 用 箱 主 语言 的 设施 处 理 。 














中 间 表 示 / 元 模型 





输入 外 部 DSL Il 






LN 
第 三 方 集成 
供给 应 用 程序 使 用 
图 2-8 ”外 部 DSL 的 处 理 阶段 。 请 注意 与 内 部 DSL 的 区 别 : 在 这 里 开发 者 需要 自行 构建 
解析 器 ; 而 对 于 内 部 DSL， 解 析 器 由 宿主 语言 提供 
接 下 来 ， 我 们 简单 看 下 外 部 DSL 开 发 中 较 常 遇 到 的 几 种 模式 。 每 种 模式 的 具体 实现 留 到 第 7 
草 再 作 详 细 介 绍 。 图 2-9 列 举 了 一 些 现实 中 常见 的 外 部 DSL 实 现 模式 。 























上 下 文 驱 动 的 字符 串 操 榨 





XML 转换 成 可 使 用 的 资源 


外 部 DSL DSL 工 作 台 


DSL rh Pipe fa 


基于 解析 如 组 合子 的 DSL 设 计 


图 2-9 ”管见 的 外 部 DSL 实 现 模式 和 技巧 ， 不 太 严 并 的 分 类 
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图 2-9 中 的 每 种 模式 都 是 一 种 描述 DSL 语 法 的 方式 ， 而 且 是 不 同 于 答 主 语言 的 描述 方式 。 也 
就 是 说 你 写 下 的 DSL 脚 本 ， 放 在 实现 培 言 里 面 ， 并 不 是 有 效 的 请 法。 所 以 你 还 会 看 到 ， 每 种 模式 
下 产生 的 定制 DSL 语 法 如 何 被 转换 成 为 供给 宿主 语言 使 用 的 制品 。 

1. 上 下 文 驱动 的 字符 串 操控 

假设 你 需要 处 理 一 些 业 务 规则 ， 但 希望 句 用 户 提供 一 个 DSL 界 面 来 取代 传统 的 API。 考 虑 下 
面 的 例子 ( commission 为 “佣金 "，principal 为 “本 金 ”): 


Commission of 5% on principal amount for trade 
values greater than $1,000,000 


这 个 字符 串 放 在 任何 编程 声言 里 都 没有 意义 。 但 只 要 进行 适当 的 “ 揉 按 拍打”， 我 们 不 难 把 
它 转换 成 有 效 的 Ruby 或 Groovy 人 代码。 一 个 简单 的 解析 天 就 可 以 完成 任务 ， 只 需要 做 一 下 分 词 ， 
然后 侠 上 正则 表达 式 做 简单 的 转换 就 可 以 了 。 最 后 得 到 的 Ruby 或 Groovy 代 人 码 就 是 可 以 耳 接 执行 
的 业务 规则 了 。 

2. XML 转换 成 可 使 用 的 资源 

大 多 数 读 者 应 该 都 用 过 Spring DI 框架 (不 熟悉 Spring 的 读者 请 查阅 http:/www.spring 
framework.org )。 其 中 一 种 配置 DI 容 硕 的 方式 是 采用 一 个 XML 配置 文件 ， 把 所 有 依赖 的 抽象 和 实 
现 都 记 入 这 个 文件 ,在 运行 时 , Spring 容 融 载 人 配置 文件 ,并 将 所 有 的 依赖 项 关联 到 BeanFactory 
或 者 Appl icationContext, 这 两 个 组 件 将 在 应 用 程序 的 整个 生命 周期 内 存活 , 以 提供 所 有 必 
需 的 上 下 文 信息 。 这 个 XML 配置 文件 就 是 一 种 外 部 DSL, 它 经 过 解析 , 被 持久 化 为 可 下 接 供应 用 
程序 使 用 的 资源 。 

图 2-10 人 简单 展示 了 Spring 将 XML 作为 外 部 DSL 导 入 其 App1l ijcationContext 抽 象 的 情形 。 


XML 充当 DSL 









































XML 配置 规范 





Spring DI 容 器 


Lu 
RE fi 
ApplicationContext 
图 2-10 XML 被 用 作 外 部 DSL， 它 是 对 Spring 配置 规范 的 抽象 。 容 器 在 启动 期 间 读 人 
并 解析 XML， 产 生 应 用 程序 所 需 的 ApplicationContext 
Hibernate 的 映射 文件 是 一 个 类 似 的 例子 ， 它 把 实体 描述 文件 映射 到 数据 库 设计 方案 。 
(Hibernate 的 内 容 详 见 http:/hibernate.org。) 虽然 两 个 例子 的 生命 周期 和 持久 化 策略 有 所 差异 ， 但 
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它们 都 具有 人 解析、 加 工 两 个 执行 阶段 ， 这 一 点 体现 了 外 部 DSL 的 共性 。 男 一 方面 ， 这 两 个 例子 又 
表现 出 与 其 他 模式 的 差异 性 , 即 其 解析 需 的 形式 与 复杂 度 、 中 间 表 示 的 生命 周期 都 有 别 于 前 面 讨 
论 过 的 模式 (上下文 驱动 的 字符 串 操 控 )。 

3. DSL 工 作 台 

我 们 在 内 部 DSL 的 语 境 下 讨论 过 元 编程 的 核心 概念 , 现在 出 现 的 一 些 语 言 工作 台 和 元 编程 系 
统 已 经 把 这 个 概念 的 内 涵 扩 展 到 了 更 高 层次 。 编写 文 本 形式 的 代码 时 , 编译 各 需要 解析 代码 并 生 
成 AST。 那 要 是 系统 了 下 接 就 把 你 写 的 代码 以 AST 的 形式 来 存放 呢 ? 如 果 系 统 能 提供 这 样 的 中 间 表 
示 ， 对 其 进行 的 转换 、 操 探 以 及 后 继 ( 以 这 种 中 间 表 示 为 基础 ) 的 代码 生成 都 会 简单 很 多 。 

Eclipse Xtext ( http://www.eclipse.org/Xtext ) 是 个 很 好 的 例 于 ， 它 提供 了 开发 外 部 DSL 的 全 套 
解决 方案 。 在 这 个 系统 中 ，DSL 不 是 保存 成 纯 文 本 形式 ， 而 是 以 元 模型 的 形式 保存 DSL 文 法 的 高 
阶 表示 。 这 些 元 模型 可 以 无 颖 地 集成 进 其 他 框 并 ， 如 代码 生成 硕 、 编 辑 带 等 。 像 Xtext 这 样 的 工 
有 具 叫做 DSL 工 作 台 ， 因 为 它们 提供 了 开发 、 管 理 、 维 护 外 部 DSL 的 完整 环境 。 第 7 草 将 通过 详细 
的 案例 分 析 讲 解 基于 Xtext 的 DSL 设 计 。 

JetBrains 的 Meta Programming System ( http://www.jetbrains.com/mps/index.html ) 支持 非 文 本 
表示 的 程序 代码 ,不 青 和 需要 代码 解析 。 代 码 及 其 标注 、 引 用 总 是 以 AST 的 形态 存在 ， 你 只 要 定义 
合适 的 生成 融 就 能 生产 出 各 种 语言 的 代码 。 这 就 好 像 我 们 在 使 用 工作 人 台 的 元 编程 系统 所 提供 的 元 
语言 设计 外 部 DSL， 用 它 来 定义 业务 规则 、 类 型 、 约 束 ， 跟 使 用 平常 的 编程 语言 没什么 两 样 。 只 
是 代码 的 外 部 表示 不 一 样 ， 它 更 友好 也 更 容易 操控 ， 甚 至 可 以 是 图 形 化 的 。 

回顾 图 2-9， 我 们 已 经 介绍 了 3 种 常用 的 外 部 DSL 实 现 手 段 ， 还 有 两 种 在 现实 中 特别 重要 的 模 
式 有 竺 讲解 。 本 章 的 第 三 个 里 程 碑 已 经 在 望 。 对 于 迄今 介绍 的 所 有 内 部 、 外 部 DSL 实 现 技术 ， 相 
信 你 已 经 有 了 很 好 的 理解 , 想必 已 经 迫不及待 地 想 看 到 它们 在 领域 建 模 中 的 实际 表现 。 请 再 耐心 
一 点 ， 你 会 很 快 就 会 看 到 相关 内 容 。 

4. DSL AJ BR RE ICH 

TP EX, LE AIYACCHIANTLRZERERT n EHK T EBNF (Extended Backus-Naur Form, 
P RÉEVEHULARTUSXSO WEIT TRELAR AA ERTE H PÆ, “吐出 ” 语 
HAUT. EENT, RIERREN RRE, LEANTA Rae A Fr EZ BJ 
时 候 执 行 ， 例 如 要 求解 析 硕 对 于 输入 的 语言 字符 串 生 成 中 间 表 示 ， 供 应 用 程序 在 后 续 环 下 使 用 。 

YACC 和 ANTLR 等 工具 允许 在 生成 规则 中 航 入 箱 主 语言 代码 编写 的 操作 定义 。 最终 得 到 的 解 
析 需 代码 也 将 每 一 条 规则 下 关联 的 C、C++ 或 Java 片 段 赛 括 在 内 。 在 这 种 外 部 DSL 设 计 模 式 下 ， 
DSL 因 为 艇 入 了 别 种 高 级 语言 而 得 到 扩展 。 我 们 将 在 第 7 草 把 ANTLR 作 为 解析 兹 生成 工具 ， 按 照 
这 个 模式 实现 一 个 完整 的 DSL 设 计 。 现 在 赶紧 看 看 最 后 一 种 模式 吧 。 

5. 基于 解析 器 组 合子 的 DSL 设 计 

这 是 图 2-9 列 出 的 最 后 一 种 模式 ， 也 是 最 有 半 新 意义 的 外 部 DSL 设 计 方 法 。 刚 刚 你 已 经 知道 
怎样 利用 YACC、ANTLR 等 外 部 工具 结合 内 骸 编 程 语 言 来 生成 DSL 解 析 带 。 这 些 工具 完全 胜任 工 
作 , 但 缺点 是 使 用 上 不 很 友好 。 现 在 有 不 少 语言 提供 了 更 好 的 蔡 代 品 , 也 就 是 解析 器 组 合子 ( parser 


combinator )。 
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在 强大 的 类 型 系统 文 持 下 ， 利 用 解析 融 组 合子 设计 而 成 的 DSL 可 以 实现 为 特 主 声言 的 一 个 
库 。 也 就 是 说 ， 实 现 过 程 中 可 以 充分 利用 特 主 霹 言 的 各 种 配件 ， 例 如 类 、 方 法 、 组 合子 等 ， 不 必 
求助 于 外 部 工具 包 。 

Scala 的 标准 库 中 已 经 包含 了 解析 恬 组 合子 库 。 在 Scala 的 高 阶 函 数 帮 助 下 ， 我 们 定义 的 组 合 
子 可 以 使 解析 恬 的 描述 语句 近似 于 EBNF 产 生 规划。 下面 就 是 一 段 Scala 解 析 带 组 合子 的 应 用 示 
例 ， 它 用 纯 Scala 语 言 定 义 了 一 种 简单 的 交易 单 处 理 语 言 的 语法 。 


object OrderDSL extends StandardTokenParsers { 
lexical.delimiters ++= List("(", ")", ",") 











lexical.reserved += ("buy", "sell", "shares", "at", 
"max", "min", "for", "trading", "account") 
def instr = trans ~ account_spec 
def trans = "(" ~> repsep(trans spec, ",") <~ ")" 
def trans spec - buy sell - buy sell instr 
def account spec = "for" ~> "trading" ~> "account" ~> stringLit 
def buy sell - ("buy" | "sell") 
def buy sell instr - security spec - price spec 
def security spec - numericLit - ident - "shares" 
def price spec = "at" ~ ("min" | "max") ~ numericLit 


} 

即使 看 不 懂 这 段 代 码 的 细节 部 分 也 没关系 。 这 所 以 举 这 个 例子 , 我 只 是 为 了 展示 一 下 纯 以 和 窒 
主语 言 完成 声明 式 解 析 需 开发 这 一 方式 有 多 大 威力 。 结 论 是 纯粹 用 Scala 开 发 外 部 DSL 解 析 需 完全 
可 行 。 
EA 第 8 章 将 再 次 讨论 解析 器 组 合子 ， 其 中 会 有 通过 Scala 解 析 器 组 合子 建立 外 部 DSL 
的 详细 示例 。 

















我 们 的 讨论 至 此 告 一 段落 ， 前面 列举 过 的 所 有 DSL 实 现 模 式 和 技巧 都 已 介绍 完毕 。 本 章 的 介 
绍 都 是 概括 性 的 , 目的 是 使 读者 对 现实 中 的 DSL 实 现 大 环境 有 所 了 解 。 至 于 每 种 模式 的 详细 用 法 ， 
我 们 安排 在 第 4 章 ~ 第 8 草 讲 解 ， 届 时 会 用 它们 实现 DSL 以 解决 现实 的 领域 问题 。 

在 本 章 结束 之 前 , 我们 最 后 考虑 一 个 具有 现实 意义 的 问题 , 也 是 你 每 次 动手 设计 DSL 之 前 应 
该 考虑 的 问题 : 怎样 才能 务实 地 决定 选择 哪 种 形式 的 DSL。 第 1 章 已 经 讨论 过 什么 时 候 该 用 DSL， 
现在 我 要 解释 下 该 如 何在 内 部 DSL 和 外 部 DSL 之 间 进 行 选择 。 用 DSL 来 建 模 领域 问题 肯定 没 错 ， 
但 同时 要 平衡 考虑 它 的 实现 方面 才 好 作出 最 终 决 定 。 无 论 决 定 设 计 一 个 内 部 DSL 还 是 外 部 DSL， 
都 取决 于 许多 因素 ; 而 且 并 非 所 有 因素 都 是 技术 因素 。 
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程序 员 随 时 都 要 面 对 许 多 选择 ， 无 论 设 计 方 针 、 编 程 范式 ， 还 是 具体 到 采 个 实现 的 惯用 法 ， 
都 等 待 我 们 作 决 策 。 怎 样 选择 才 会 有 好 的 DSL， 怎 样 选择 才 会 有 好 的 抽象 ， 以 及 怎样 选择 才能 满 
足 领域 用 户 对 表现 力 的 要 求 ， 这 些 我 们 全 都 讲 过 了 ; 现在 , 我 们 要 介绍 一 下 你 将 会 面 对 的 为 外 一 


些 选 择 。 
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当 你 决定 让 项 目 走 上 基于 DSL 开 发 的 道路 , 也 确定 了 能 在 DSL 设 计 中 派 上 用 场 的 业务 领域 组 
fF, 这 时 候 怎 样 决定 实现 策略 呢 ? 应 该 利用 宿主 语言 把 问题 建 模 成 内 部 DSL， 还 是 应 该 为 了 表现 
力 水 平 而 选择 外 部 DSL? 这 个 问题 和 大 多 数 的 软件 工程 问题 一 样 , 并 没有 放 之 四 海 而 丝 准 的 正确 
答案 。 问 题 域 不 许 做 什么 和 解答 域 允许 做 什么 ， 共 同 决 定 了 我 们 的 答案 。 在 你 下 决心 选择 某 种 
DSL 实 现 技 术 之 前 ， 有 几 大 因素 是 应 该 考虑 的 ， 本 节 就 带 你 审视 一 番 。 

1. 重用 现 有 设施 

内 部 DSL 搭 了 宿主 语言 的 顺风 车 ， 所 有 的 设施 、 语 法 、 语 义 、 模 块 系 统 、 类 型 系统 、 错 误 报 
告 方法 、 完 整 的 工具 链 ， 内 部 DSL 都 能 沾 光 。 这 一 点 绝对 是 内 部 DSL 的 最 大 实现 优势 。 而 对 于 外 
部 DSL 来 说 ， 任 何 设施 都 要 从 零 开 始 建设 ， 这 绝 非 易 事 。 在 内 部 DSL 范 围 内 ， 我 们 又 有 多 种 实现 
模式 可 以 选择 ， 这 在 上 一 市 都 已 经 讨论 过 。 决 策 主 要 取决 于 答 主 语言 的 能 力 和 它 所 文 持 的 抽象 
层次 。 

如 果 宿 主语 言 如 Scala 或 Haskell 那 样 拥有 强大 的 类 型 系统 ， 那 么 你 可 以 考虑 用 其 类 型 系统 来 
表达 领域 类 型 ， 从 而 得 到 纯粹 的 内 骨 式 DSL。 不过， 类 型 内 髓 不 一 定 总 是 最 优 的 选项 ， 只 有 当 客 
体 语言 的 语法 、 语 义 都 接近 于 箱 主 语言 时 ， 这 才能 取得 好 的 效果 。 任 何 一 方面 不 匹配 都 会 使 DSL 
与 宿主 语言 的 系统 环境 格格 不 入, 使 答 主 语言 的 控制 结构 无 法 顺利 地 组 织 起 DSL 语 句 。 在 这 种 情 
况 下 ， 你 也 许 应 该 求助 于 元 编程 技术 一 一 如 果 和 宿主 语言 提供 了 这 种 选择 。 前 面 已 经 介绍 过 ， 因 为 
元 编程 允许 扩展 宿主 语言 ， 允 许 在 其 中 加 入 原本 没有 的 领域 构造 ， 所 以 最 后 得 到 的 DSL 表 面 语法 
能 比 类 型 内 散 方 案 表现 力 更 强 。 

2. 充分 利用 现 有 的 知识 

有 些 时 候 , 你 只 能 根据 团队 成 员 现 有 的 知识 水 平 来 选择 实现 范式 。 内 部 DSL 在 这 一 点 上 较 有 
优势 。 不 过 要 注意 ， 程 序 员 熟 悉 某 种 语言 ， 并 不 等 于 就 熟悉 该 语言 下 的 DSL 实 现 惯 例 。 连 贯 接 口 
在 Java 和 Ruby 中 很 常见 ， 但 并 非 没 有 陷阱 。 在 具体 的 条 件 下 必须 考虑 许多 方面 才能 保证 DSL 语 义 
上 的 一 致 性 ， 比 如 抽象 是 否 可 变 、 连 贯 API 是 否 上 下 文敏 感 ， 还 有 方法 链 的 收尾 问题 〈finishing 
problem, 参见 2.6 市 文献 [4] )。 所 有 这 些 考 虑 角度 都 牵涉 到 模式 或 惯用 法 的 微妙 变化 , 对 DSEL 的 一 
致 性 有 不 可 忽视 的 影响 。 

利用 现 有 的 知识 肯定 是 必须 考虑 的 因素 。 团队 领导 判断 成 员 的 专业 能 力 , 不 应 该 根据 他 们 对 
语言 表面 语法 的 熟悉 程度 ， 而 应 该 放 在 实现 DSL 的 背景 下 去 衡量 。 有 的 团队 不 会 铠 强 坚 持 用 Java 
实现 内 部 DSL 的 方案 ,而 是 会 选用 XML 来 实现 外 部 DSL， 并 且 极 大 地 提高 了 生产 效率 , DUET 
用 户 的 认可 。 

3. 外 部 DSL 的 学 习 曲 线 

也 许 你 不 敢 选择 外 部 DSL， 因 为 觉得 设计 外 部 DSL 就 像 设 计 通 用 编程 语言 那么 复杂 。 我 不 怪 
你 有 这 样 的 想法 。 只 要 一 提 语 法 制导 翻译 、 递 归 下 降解 析 、LALR 和 SLR 这 些 术 语 ， 人 们 就 很 难 
不 鉴于 复杂 性 被 它们 吓 到 。 

现实 中 ， 大 多 数 应 用 程序 所 要 求 的 外 部 DSL 没 必要 做 得 像 完整 的 编程 语言 那么 复杂 。 不 过 ， 
确实 有 些 外 部 DSL 相 当 复 杂 ， 必 须 将 其 学 习 曲 线 纳入 开发 成 本 去 考虑 。 外 部 DSL 的 优点 是 可 以 定 
制 几乎 任何 东西 , 连 如 何人 处理 错误 和 异常 都 可 以 定制 ,你 不 会 因为 窒 主 语言 的 限制 而 被 束 手 束 脚 。 
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4. 恰当 的 表现 力 水 平 

虽然 内 部 DSL 对 现 有 设施 的 重用 是 很 大 的 优势 , 但 答 主 语言 强加 的 约束 使 你 设计 出 来 的 DSL 
很 难 达 到 领域 用 户 要 求 的 表现 力 水 平 ,这 也 是 事实 。 在 现实 中 , 往往 要 等 到 开发 环境 和 工具 链 都 
已 经 不 可 能 更 改 的 时 候 , 我 们 才 发 现 有 的 模块 很 适合 应 用 DSL。 因 此 ,你 不 见得 有 机 会 选择 最 合 
适 的 语言 来 设计 内 部 DSL。 

在 这 种 时 候 ， 我 们 有 必要 考虑 在 应 用 程序 架构 中 纳入 外 部 DSL。 用 外 部 DSL 建 模 领 域 问题 的 
最 大 优点 , 是 你 可 以 把 语言 的 复杂 度 设 计 得 正好 和 手头 问题 相 匹配 。 外 部 DSL 给 予 开 发 者 充足 的 
调整 空间 去 适应 用 户 反 人 馈 ， 而 内 部 DSL 就 不 一 定 能 做 到 这 一 点 ， 因 为 请 法、 语义 始终 在 答 主 语言 
的 约束 之 下 。 

5. 组 合 性 

在 典型 的 应 用 程序 开发 场景 中 ,不同 的 DSL 或 者 DSL 和 箱 主 语言 都 有 可 能 需要 组 合 起 来 使 
用 。 内 部 DSL 与 宿主 语言 的 组 合 很 简单 ， 毕 竟 DSL 是 使 用 同 种 语言 实现 的 ， 而 且 一 般 都 实现 成 宿 
主语 言 的 一 个 库 。 

组 合 使 用 多 种 DSL 就 值得 讨论 一 番 了 , 即使 所 有 DSL 的 答 主 语言 都 一 样 , 情况 也 不 那么 单纯 。 
对 于 静态 类 型 语言 下 实现 的 儿 种 内 欧式 DSL, 必须 在 宿主 语言 类 型 系统 的 支持 下 才 有 可 能 无 颖 地 
组 合 在 一 起 。 支 持 函 数 式 编程 疙 式 的 语言 ,一 般 吉 励 你 基于 函数 式 的 组 合子 设计 内 部 DSL。 如 果 
设计 得 当 ， 内 部 DSL 和 组 合子 完全 可 以 组 合 。 外 部 DSL 比 较 难 做 到 组 合 使 用 ， 尤 其 当 两 种 DSL 被 
分 别 设计 ， 又 没有 预先 考虑 组 合 要 求 的 情况 下 ， 就 更 不 可 能 实现 了 。 















































25 小结 


从 第 1 章 的 基本 原理 ， 到 本 章 实用 主义 的 DSL 用 法 、 实 现 、 分 类 ， 你 已 经 在 很 短 的 时 间 内 汲 
取 了 大 量 知 识 。 如 果 说 第 1 章 只 是 指引 你 步 人 DSL 开 发 ， 那 么 本 章 就 切切 实 实地 把 你 带 到 了 DSL 
的 现实 世界 。 

本 曹 一 开头 就 举例 强调 基于 DSL 的 程序 开发 重点 是 抽象 的 表现 力 。Java 实 现 的 交易 单 处 理 
DSL 对 于 作为 用 户 的 程序 员 来 说 表现 力 已 经 足够 。 但 如 果 打 算 让 不 懂 编 程 的 领域 专家 用 你 的 DSL 
作为 表达 载体 ， 你 就 要 有 一 种 更 能 传达 领域 含义 的 实现 语言 。Groovy 实 现 做 到 了 ， 从 Java 迁 移 到 
Groovy 大 大 提高 了 其 表现 力 水 平 。 

接着 ,我 们 的 话题 从 具体 实现 转 为 更 广泛 的 DSL 模 式 。 你 了 解 到 在 内 部 和 外 部 DSL 两 大 分 类 
下 还 有 很 多 不 同 的 实现 模式 。DSL 的 复杂 度 各 不 相同 。DSL 设 计 者 需要 挑选 最 适合 手头 问题 的 实 
现 策 略 。 然 后 ，2.3 节 逐一 介绍 各 种 模式 ， 以 便 你 对 现 有 的 DSL 实 现 技 术 有 个 概括 的 了 解 。 

阅读 完 本 章 ， 你 已 经 见识 过 五 花 八 门 的 DSL 形 式 和 结构 了 。 最 终 把 领域 模型 塑造 成 什么 样 ， 
这 是 架构 师 的 责任 。 不 过 在 继续 建 模 的 话题 之 前 ， 我 们 需要 先 解 决 DSL 与 开发 环境 的 集成 问题 。 
目前 为 止 ， 我 们 已 经 见 过 DSL 的 宏观 模型 发 挥 作用 。 现 在 请 换 一 种 思维 ， 想 一 想 DSL 开 发 中 的 微 
观 建 模 产 物 。 假设 你 在 JVM 平 台 上 用 Java 开 发 了 核心 应 用 程序 ， 然后 又 开发 了 Groovy DSL, 请 问 
两 方面 要 怎样 集成 ， 才 能 保证 DSL 既 可 以 访问 Java 组 件 ， 又 能 维持 其 独立 实体 的 身份 ”为 了 回答 
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这 个 问题 ， 你 要 面 对 许 多 选择 和 陷阱 ; 这 些 都 是 下 一 草 的 内 容 。 


要 点 与 最 佳 实践 

口 Java 的 语言 特性 足以 实现 出 具有 充分 表现 力 的 DSL。 如 果 你 感觉 Java 有 所 局 限 ， 请 关注 
JVM 平 台 上 与 Java 互 操作 性 良好 的 其 他 语言 。 

O 当 你 为 DSL 选 定 一 种 实现 语言 ， 请 注意 学 习 那 些 使 DSL 贴 近 实 现 语言 习惯 的 模式 。 当 选 
用 Groovy 或 Ruby 时 ， 元 编程 模式 是 最 好 的 帮手 。 当 选用 Scala 时 ， 它 强大 的 类 型 系统 可 
以 成 为 DSL 实 现 的 靠山 。 

口 选 择 DSL 实 现形 式 的 时 候 ， 要 保持 开放 的 心态 。 外 部 DSL 看 似 困 难 ， 但 实践 中 很 少 有 必 
要 从 头 实 现 一 种 完整 全 面 的 语言 ， 所 以 复杂 度 不 一 定 有 那么 高 。 








在 后 面 的 革 市 里 , 我 们 将 要 实现 证 券 交 易 领 域 的 各 种 DSL 刻 段 ， 老 鲍 当 然 也 会 陪 厦 我们 ， 用 
他 洞悉 全 局 的 眼光 帮忙 改进 DSL 的 表现 力 。 
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本 章 内 容 

Q 将 内 部 和 外 部 DSL 集 成 进 核心 应 用 程序 
口 管理 错误 和 异常 

口 优化 性 能 表现 


前 两 章 我 们 在 用 户 和 实现 的 层次 对 DSL 进 行 了 多 方位 的 观察 和 探讨 。 可 以 看 到 ， 提 高 抽象 的 
表现 力 可 使 代码 更 易于 理解 ， 可 以 帮助 缩短 与 领域 专家 之 间 的 反馈 循环 。 不 过 , 不 管 DSL 设 计 得 
多 么 出 色 ， 归 根 结 底 你 要 把 它 和 核心 的 Java 应 用 程序 模型 集成 在 一 起 。( 倒 不 一 定 是 Java 应 用 程 
序 ， 这 里 只 是 举例 。) 集成 牵涉 到 的 众多 方面 也 需要 你 未 雨 绸 绪 。 以 上 种 种 ， 以 及 用 DSL 来 开发 
一 个 完整 应 用 程序 会 遇 到 的 其 他 问题 ， 就 是 本 草 的 讨论 内 容 。 

一 般 来 说 ， 我 们 会 用 平台 上 的 主要 语言 ( 比如 Java ) 来 开发 应 用 程序 的 主体 部 分 。 然 后 ， 对 
于 一 些 业 务 规则 或 者 配置 规范 , 我 们 可 以 用 比 Java 表 现 力 更 强 的 语言 写成 DSL 来 表述 。 那 么 , DSL 
部 分 应 该 怎样 跟 核 心 应 用 程序 无 颖 集成 呢 ? DSEL 的 演变 往往 独立 于 应 用 程序 的 主体 部 分 , 所 以 架 
构 上 要 足够 灵活 ， 不 能 妨碍 DSL 时 时 的 改变 ， 还 要 使 变化 对 应 用 程序 主体 的 影响 尽 可 能 小 。 本 章 
对 以 上 问题 的 讲解 计划 参见 图 3-1。 

关于 DSL 了 驱动 的 应 用 程序 开发 ， 我 们 主要 探讨 3 个 方面 : 

口 集成 问题 ; 

口 处 理 异常 和 错误 ; 

OQ 管理 性 能 表现 。 

DSL 不 能 独立 发 挥 作 用 。 集 成 DSL 到 应 用 程序 需要 考虑 诸多 问题 ， 其 中 有 一 项 是 错误 处 理 : 
无 论 DSL 还 是 核心 应 用 程序 都 有 可 能 产生 异常 。 你 打算 怎样 回 DSL 用户 报 告 错 误 ? 又 打算 怎样 处 
理 ? (我 们 将 在 3.4 节 演 试 解答 。) DSL 使 用 中 还 可 能 出 现 各 种 性 能 问题 ， 本 章 结尾 部 分 对 此 有 个 
简要 的 总 结 。 

读 完 本 草 ， 你 将 学 会 安排 应 用 程序 的 架构 ， 使 之 能 与 别 种 语言 编写 的 DSL 无 颖 集成 。 
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DSL 需 要 与 核心 
应 用 程序 集成 
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3.1 


为 什么 要 集成 ? 





4p fn] e ERES RAE 
集成 外 部 DSL 


别 乐 了 关注 性 能 
集成 内 部 DSL (主要 
以 库 的 形式 ) 


图 3-1 了 解 本章 学 习 计划 ， 学 习 DSL 驱 动 应 用 程序 开发 的 各 种 问题 


3.1 探索 DSL 集成 


DSL 是 一 种 优 闫 的 抽象 ， 它 也 蝶 不 例外 地 需要 与 应 用 程序 架构 中 的 其 他 组 件 集成 。 在 一 般 的 
使 用 场景 中 , DSL 所 建 梗 的 制品 属于 应 用 程序 中 易 变 的 部 分 , 比如 业务 规则 和 配置 参数 .所 以 DSL 
和 应 用 程序 主体 要 能 够 以 不 同 的 步调 各 目 独 立地 演变 , 同时 它们 又 能 够 与 工作 流 无 缝 地 结合 ,这 
两 点 都 是 非常 重要 的 设计 要 求 。 

这 一 市 ， 我 们 将 探索 无 颖 集成 DSL 的 各 种 途径 。 一 种 DSL 本 里 只 针对 一 个 专门 的 领域 , 却 有 
可 能 在 多 个 更 大 的 领域 中 使 用 ,至 于 实际 上 是 否 被 广泛 使 用 ,还 要 看 它 所 针对 的 领域 的 通用 程度 。 
例如 , 一 种 处 理 日 期 时 间 的 DEL 在 任何 需要 计算 日 期 的 程序 中 都 用 得 上 ， 而 一 种 针对 企业 税收 规 
定 的 DSL 用 途 就 非常 有 限 了 。 男 外 ， 因 为 日 期 DSL 要 考虑 集成 到 多 个 应 用 程序 上 下 文 的 情况 ， 所 
以 它 要 具有 更 强 的 适应 性 。 

我 们 稍 后 便 深 入 介绍 DSL 集 成 问题 , 在 此 之 前 , 请 看 图 3-2, 一 个 DSL 驱 劲 的 应 用 程序 架构 大 
体 上 就 是 这 个 样子 。 

对 于 典型 的 多 层 染 构 ，DSL 可 以 用 在 任何 一 屋 , 只 要 它 准 备 好 该 层 要 求 的 集成 上 下 文 信息 避 ® 
行 。 集 成 内 部 DSL 相 对 容易 , 因为 内 部 DSL 一 般 与 应 用 程序 使 用 同 种 语言 , 且 被 设计 为 库 的 形式 。 
集成 外 部 DSL 较 为 胀 烦 ， 需要 建立 菏 种 插入 机 制 ， 对 外 公开 专门 的 站 口 给 应 用 程序 对 接 。 我 们 不 
急 着 列举 内 内 部 和 外 部 DSL 集 成 到 应 用 程序 架构 的 具体 用 例 ， 先 来 谈 谈 为 什么 需要 小 心 处 理 DSL 
的 集成 问题 。 
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核心 应 用 程序 





应 用 程序 
配置 DSL 











图 3-2 ”宏观 视角 下 基于 DSL 的 应 用 程序 染 构 ， 注 意 DSL 与 核心 应 用 程序 的 解 看 情形 。 
不 同 部 分 的 演变 时 间 表 各 不 相同 


为 什么 关心 DSL 集 成 


核心 应 用 程序 对 内 有 各 种 组 件 要 连接 ,对 外 有 DSL 脚 本 要 插入 ,两 者 都 需要 你 小 心 处 理 。 DSL 
的 演变 步调 独立 于 核心 应 用 程序 ， 所 以 两 者 之 间 的 耘 合 程度 要 恰如其分 。 


如 果 选 用 Groovy、Ruby、Scala 等 表现 力 强 的 语言 作为 核心 应 用 程序 的 主要 语言 ， 
基本 上 不 存在 什么 集成 问题 ; 根本 就 没 必要 插入 其 他 语言 的 DSL 脚 本 。 所 以 ， 接 
下 来 的 内 容 主 要 与 在 Java 应 用 程序 中 集成 DSL 脚 本 的 情况 有 关 。 


开发 者 很 容易 鲁莽 地 决定 在 一 个 应 用 程序 内 使 用 多 种 语言 的 DSL, 却 筷 了 想 想 到 时 候 要 怎么 
集成 。 如 末 选 错 了 DSL 的 实现 语言 ， 图 3-2 中 好 端 端的 架构 可 能 会 变 成 开发 者 的 虚 梦 。 没 有 人 和 布 
望 落 到 好 像 图 3-3 所 示 那 般 境地 。 

如 果 想 做 到 DSL 与 应 用 程序 无 颖 集成， 不 想 陷入 图 3-3 中 那 位 仁兄 的 境况 ,那么 你 就 必须 好 
好 考虑 表 3-1 列 举 的 几 个 问题 。 























表 3-1 将 DSL 集 成 到 核心 应 用 程序 








待 解 问题 架构 师 应 做 事项 
关注 点 分 离 
一 方面 是 DSL 要 解决 的 核心 问题 , 一 方面 是 DSL 要 应 付 。” 正确 定义 DSL 的 适用 上 下 文 ， 并 考虑 DSL 在 当前 应 用 之 外 可 
的 应 用 程序 上 下 文 ， 怎 样 保证 两 者 之 间 泾 渭 分 明 ? 能 的 应 用 场景 





参考 附录 A 中 作为 一 个 核心 特质 探讨 的 抽象 设计 原则 : 精炼 
DSL API 的 演化 
DSL API 的 演变 要 独立 于 应 用 程序 上 下 文 确保 API 在 演变 过 程 中 维持 向 后 兼容 
如 果 使 用 第 三 方 提 供 的 DSL， 一 旦 发 现 它 的 API3| 人 了 不 兼 
容 的 改动 , 就 要 立即 警觉 起 来 , 否则 说 不 定 什 么 时 候 会 被 “ 反 
咬 上 一 口 ” 
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待 解 问题 
避免 语言 摩擦 
各 种 DSL 所 用 的 语言 太 多 ,会 给 整个 架构 的 开发 和 维护 
造成 混乱 


DSL 驱动 的 应 用 程序 开发 


架构 师 应 做 事项 





确保 DSL 的 实现 语言 可 以 跟 应 用 程序 的 香 主 语言 无 颖 地 互 
操作 








这 不 仅 是 技术 问题 , 还 是 人 员 问 题 。 当 程序 员 被 迫 维护 
太 多 种 语言 写成 的 代码 ， 他 们 会 失去 合作 的 意愿 


Jd 





[ [3-3 
你 能 帮 他 解除 这 个 定时 炸弹 吗 


宁可 部 分 牺牲 DSL 语 法 的 灵活 性 , 也 不 应 选择 无 法 很 好 地 集成 
到 核心 应 用 程序 的 语言 。 不 能 因为 不 同 语言 运行 在 相同 虚拟 机 
( VM) 上 就 认为 其 间 能 无 缝 地 互 操 作 ， 请 记 住 这 个 提醒 

如 果 DSL 的 实现 语言 可 以 通过 多 种 途径 与 应 用 程序 的 答 主 
语言 互 操作 ,请 优先 选择 具有 最 日 然 集成 方式 的 一 那 种 ; 基 
于 沙 盒 的 脚本 环境 虽然 是 一 种 通用 的 集成 途径 ， 只 宜 作为 后 











备 选 项 。 我们 将 在 3.2 节 以 Groovy 和 Java 互 操作 为 例 来 说 明 各 
种 集成 方式 





应 用 程序 
配置 DSL 







名 构 师 如 坐 针 秆 ， 和 兰 思 宙 想 怎样 把 不 同 语言 写成 的 DSL 跟 核心 应 用 程序 集成 。 


你 已 经 知道 为 DSL 和 核心 应 用 程序 制定 集成 倘 略 的 必要 性 , 接 下 来 该 了 解 一 下 各 种 策略 的 使 





用 模式 了。 站 和 完 说 明 的 是 内 部 DSL 的 集成 模式 ， 内 部 DSL 主 要 做 成 库 的 形式 ， 以 库 中 API 的 形式 


进行 集成 。 
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3.2 内 部 DSL 的 集成 模式 


设计 成 库 形式 的 内 部 DSL， 其 实现 语言 要 人 么 和 应 用 程序 主体 相同 ， 要么 可 以 与 之 无 缝 互 操 
作 。 不 管 哪 种 情况 ， 集 成 都 无 需 依 助 任何 外 部 设施 来 完成 ; 无 非 是 在 DSL 与 核心 应 用 程序 之 间 
发 生 的 API 调 用 而 已 。 因 为 在 同一 的 VM 约 束 下 , 各 种 语言 的 互 操作 融洽 无 间 , 我 把 这 种 情况 称 
为 同 质 集成 。 请 看 图 3-4， 可 以 看 到 分 别 用 Java、Groovy 和 Spring 配置 语言 实现 的 不 同 DSL 可 无 
差别 地 集成 于 JVM 之 上 。 每 种 DSL 都 可 以 做 成 jar 文 件 来 部 署 ， 主 体 应 用 程序 只 需 引 用 jar 文 件 
B[ n] 。 

















(Groovy) 






核心 应 用 程序 







每 种 DSL 都 可 以 做 成 
jar 文 件 ， 与 核心 Java 二 (Java) 
应 用 程序 无 颖 互 操作 


~ (Spring) 


图 3-4 3 种 DSL 均 与 核心 应 用 程序 同 质 集成 。 每 种 DSL 都 可 部 署 为 jar 文 件 ， 以 便 与 核 
心 Java 应 用 程序 在 JVM 上 无 颖 地 互 操作 


(Java) 


应 用 程序 
配置 DSL 






















假设 你 主要 用 编程 语言 Java 开 发 应 用 程序 , 但 因为 自己 有 多 语言 能 力 ， 所 以 打算 利用 Groovy 
的 优势 实现 XML Builder 功 能 。( 这 种 Builder 是 在 Groovy 下 处 理 XML 的 绝 佳 方式 ,参见 
http://www.ibm.com/developerworks/java/library/j-pg04125/。 ) 没 多 久 你 又 发 现 , 有 个 第 三 方 的 JRuby 
DSL 很 适合 用 来 加 载 Spring bean 以 管理 应 用 程序 配置 。 这 时 候 ， 应 该 怎样 把 好 几 种 DSL 和 核心 应 
用 程序 集成 在 一 起 呢 ? 集 成 不 可 以 让 用 户 面 临 太 多 复 森 性 ; 同时 ，DSL 要 与 核心 应 用 程序 保持 足 
够 的 独立 性 ,以 便 独 立 擎 握 其 演变 步调 和 生命 周期 JVM 语 言 所 写 的 DSL 可 以 通过 多 种 方式 与 Java 
应 用 程序 集成 。 

众多 JVM 语 言 大 都 提供 了 与 Java 集 成 的 多 种 途径 。 表 3-2 列 出 的 每 一 种 方式 都 能 达到 集成 目 
的 ， 但 你 必需 了 解 每 一 种 方式 的 优 缺 点 ， 从 中 选 出 最 适合 的 。 
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表 3-2 ”内 部 DSL 的 集成 入 口 














内 部 DSL 的 集成 模式 集成 入 口 
Java 6 的 脚本 引 敬 (参见 3.2.1 市 ) 用 Groovy 等 脚本 语言 编写 的 DSL 可 通过 Java 6 提供 的 相应 脚本 引擎 来 集成 
DSL 包 装 器 ( 参见 3.2.2 节 ) 利用 JRuby、Scala、Groovy 等 语言 把 Java 对 象 包装 成 更 灵巧 的 API， 这 些 语言 
本 身 就 有 Java 和 集成 功能 
语言 特有 的 集成 功能 (8532.35 ) ”通过 实现 一 种 下 接 加 载 并 解析 DSL 脚 本 的 程序 抽象 直接 与 Java 集 成 。Groovy 
具有 这 样 的 直接 集成 能 
基于 Spring 的 集成 ( 参见 3.2.4 市 ) 通过 Spring 的 声明 式 配 置 直 接 加 载 用 动态 语言 编写 的 各 种 bean 到 应 用 程序 


接 下 来 讨论 集成 的 时 候 ， 我 们 都 假定 核心 应 用 程序 是 以 Java 语 言 开发 的 ， 这 种 情 

况 当今 最 为 普遍 .另外 请 注意 ,虽然 我 们 提 到 的 几 种 语言 全 都 具备 不 同 程度 的 Java 
集成 能 力 , 但 它们 彼此 之 间 的 集成 还 不 成 熟 。 现 在 还 没有 人 在 Groovy 应 用 程序 里 面 内 能 
Ruby 写 的 DSL 。 


下 面 我 们 就 来 一 一 详 述 表 3-2 所 列 的 模式 ,看 看 一 些 JVM 诸 言 是 怎么 利用 它们 集成 到 Java 应 用 
程序 的 。 
2. 


1 通过 Java 6 的 脚本 引擎 进行 集成 


Java 平 台 普 及 程度 非常 高 ,所 以 早 有 人 考虑 为 Java 平 台 上 的 所 有 语言 建立 统一 的 互 操 作 平 台 。 
Java 6 的 脚本 特性 允许 通过 相应 的 引擎 在 Java 应 用 程序 中 村 入 脚本 语言 ,通过 javax.script 包 内 
定义 的 API, 完全 可 以 用 于 舱 入 Groovy、JRuby 等 语言 实现 的 DSL。 来 看 这 种 集成 方式 的 一 个 示例 ， 
其 中 还 是 沿用 第 2 章 中 的 交易 单 处 理 DSL。 

1. 准备 Groovy DSL 

在 2.2.2 方 ， 我 们 写 了 一 段 Groovy 肢 本 来 执行 创建 订单 的 DSL。 现 在 还 是 同样 的 DSL, 但 这 次 
要 在 Java 应 用 程序 里 面 集成 和 调用 。 这 个 例子 将 让 你 认识 Java 肢 本 特性 开启 DSL 集 成 通道 的 能 

代码 清单 3-1 中 就 是 我 们 用 来 处 理 客 户 交 易 单 的 DSL 的 Groovy 实 现 ( C11entorder.groovy. 
其 内 容 与 2.2.2 市 中 的 相同 )。 


代码 清单 3-1 ClientOrder.groovy: Groovy 语 言 编 写 的 交易 单 处 理 DSL 


ExpandoMetaClass.enableGloballyv() 








3. 




















class Order { 
def security 
def quantity 
def limitPrice 
def allOrNone 
def value 
def bs 


def buy(su, closure) { 
bs = 'Bought ' 
buy_sell (su, closure) 
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} 


def sell(su, closure) { 
bs = 'Sold' 
buy_sell (su, closure) 


} 


def getTo() { 
this 
} 


private buy sell(su, closure) { 


security - su[0] 
quantity = su[1] 
closure() 





Í 


def methodMissing(String name, args) { 
order.metaClass.getMetaProperty(name).setProperty(order, args) 


} 


def getNewOrder() { 
order - new Order() 


} 


def valueAs (closure) { 
order.value = closure (order .quantity, order.limitPrice[0]) 


order 


} 


Integer.metaClass.getShares = { -> delegate } 
Integer.metaClass.of = { instrument -> [instrument, delegate] } 


我 们 在 上 面 的 Groovy 代 码 中 实现 了 一 个 0rder 抽 象 来 反映 用 户 输入 的 交易 单 详情 。 而 在 另 一 
个 脚本 文件 order.dsl ( 代码 清单 3-2 ) 中 ,DSL 用 户 利用 代码 清单 3-1 中 的 实现 把 用 户 下 单 的 操作 写 
成 脚本 一 一 这 个 脚本 也 是 Groovy 代 码 。 注 意 ， 用 户 脚本 完全 基于 我 们 在 代码 清单 3-1 中 设计 的 
DSL, 用 户 只 需要 具备 最 低 限度 的 编程 知识 。 除了 建立 交易 单 , 脚本 还 将 交易 单 收集 到 一 个 集合 ， 
然后 返回 给 调用 者 。 但 调用 者 是 谁 呢 ? 别 急 ， 你 马上 就 会 知道 。 














代码 清单 3-2 order.dsl: 执行 下 单 操 作 的 一 段 Groovy 脚 本 


orders = [] 
newOrder.to.buy(100.shares.of('IBM')) { 

limitPrice 300 

allOrNone true 

valueAs (qty, unitPrice -> qty * unitPrice - 500} 
) 9 将 交易 单 加 入 集合 
orders «« order 
newOrder.to.buy(150.shares.of('GOOG')) { 

limitPrice 300 

allOrNone true 


valueAs (qty, unitPrice -> qty * unitPrice - 500} 
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orders << order 


newOrder.to.buy(200.shares.of('MSOFT')) { 
limitPrice 300 
allOrNone true 
valueAs (qty, unitPrice -> qty * unitPrice - 500} 
} 
orders << order 0 将 集合 返回 给 调用 者 
orders 


在 代码 清单 3-2 中 ， 用 户 写 neworder 建 立 一 个 新 的 0rder 抽 象 ， 然 后 填 和 人 各 种 属性 ， 比 如 
买 入 卖 出 、 交 易 数 量 、 限 价 、 定 价 策 略 等 。 所 有 新 建立 的 交易 单 都 被 放 人 入 一 个 集合 佑 ,该 集合 在 
在 @@ 的 位 置 被 返回 。 

至 此 铺垫 工作 都 已 完成 ,重头戏 就 要 上 场 了 : 我 们 要 把 DSL 实 现 和 用 户 脚本 都 集成 到 Java 应 
用 程序 主体 。 

2. 集成 DSL 实 现 及 用 户 脚本 

代码 清单 3-3 是 从 应 用 程序 主体 中 截取 的 代码 户 段 ， 它 等 着 DSL 脚 本 执行 后 返回 的 一 个 交易 
单 集合 , 然后 对 交易 单 进 行 后 续 处 理 。 这 里 用 到 的 脚本 引 警 是 Groovy 语 言 的 ; 44 JRuby, Clojure, 
Rhino 和 Jyphon 等 其 他 JVM 语 言 的 引擎 , 也 可 以 像 Groovy 的 一 样 无 颖 整合 到 Java 应 用 程序 里 ( 详 见 
https://scripting.dev.java.net/ )。 








代码 清单 3-3 ”调用 Groovy DSL 的 Java 程 序 代码 
ScriptEngineManager factory = new ScriptEngineManager(); 


ScriptEngine engine - factory.getEngineByName("groovy"); e 取得 脚本 引擎 的 工厂 
List<?> orders = (List<?>) pi 
engine.eval (new InputStreamReader( 
new BufferedInputStream( 返回 交易 单 的 列表 
new SequencelInputStream( 
new FilelnputStream("ClientOrder.groovy"), 0 
new FilelnputStream("order.dsl"))))); 


取得 Groovy 脚 本 引擎 


System.out.println(orders.size()); 
for(Object o : orders) { B dos 


System.out.printin(o); 


j 

对 照 代 码 清单 3-3 和 图 3-5$, 我 们 不 难看 清 集成 的 每 一 个 步骤 。 图 3-$ 的 顺序 图 上 标注 了 代码 清 
单 3-3 中 对 DSL 脚 本 及 实现 所 进行 的 操作 。 

显然 ,Java 6 的 脚本 API 儿 乎 能 够 集成 任何 JVM 语 言 编写 的 DSL 到 Java 忆 用 程序 。javax .script 
包 内 的 API 还 能 用 于 设置 各 种 作用 域 的 变量 绑 定 ， 以 便 在 DSL 与 Java 组 件 之 间 交 换 信 息 。 

3. Java 6 脚本 特性 的 不 足 

Java 6 脚本 特性 是 实现 JVM 语 言 互 操作 的 一 种 极 通用 方式 。 但 有 所 谓 通用 策略 ， 就 说 明 有 专 
门 针对 某 种 语言 的 更 好 选择 。 由 于 DSL 脚 本 被 一 个 单独 的 classLoadezr 加 载 , 又 在 独立 的 沙 盒 
运行 ，Groovy 抽 和 象 与 Java 抽 和 象 之 间 存 在 互 操作 问题 。 注 意 ， 在 代码 清单 3-3 中 ，Groovy DSL 脚 本 
返回 的 order 列 表 ， 到 了 Java 一 侧 就 成 了 object 列 表 。 要 在 这 些 对 象 上 调用 orqder 抽 象 定义 的 方 
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法 ， 只 好 利用 反射 。 另 外 ， 由 于 脚本 在 scriptEngine 的 沙 盒 中 执行 ， 当 出 现 异常 时 ， 栈 跟踪 信 
息 中 显示 的 行 号 无 法 对 应 到 源 文件 中 的 行 号 。 因 此 ，DSL 脚 本 抛 出 的 异常 调试 起 来 比较 困难 。 
为 Java 6 脚本 这 样 那样 的 不 足 ， 我 们 有 必要 继续 探索 更 好 的 内 部 DSL 集 成 方案 。 


JavaApp ScriptEngineManager 


1 
1 
new i 














D 
获得 相应 脚本 
SI € 
do 
f| "groovy" 31% @ 
一 





连接 DSL 实 现 部 分 和 O 
DSL 用 户 脚本 部 分 


执行 脚本 @ 
交易 单列 表 @ 








处 理 返 回 的 交易 单 集合 O 


JavaApp ScriptEngineManager 


www.websequencediagrams.com 








图 3-5 ”通过 Java 6 的 脚本 引擎 集成 Groovy DSL。 这 幅 交 互 图 反映 了 在 ScriptEngine 
的 沙 盒 内 执行 Groovy DSL 脚 本 的 全 部 步骤 


脚本 引擎 是 从 Java 6 开始 引入 的 , 是 一 种 在 Java 程 序 内 部 执行 脚本 的 通用 方法 。 按 
照 ScriptEngine 相 关 API 的 设计 原则 ， 任 何 JVM 语 言 只 要 实现 了 JSR 233 规 范 要 
求 的 设施 ， 就 能 获得 该 特性 的 支持 。 如 果 你 打算 用 于 实现 DSL 的 语言 有 专门 的 Java 集 成 
途径 ， 应 该 优先 考虑 ， 仅 将 JSR 233 兼 容 的 方案 作为 退 而 求 其 次 的 选择 。 语 言 特 有 的 方 
和 案 一 般 较 为 简单 ， 也 更 符合 语言 习惯 ， 所 以 往往 效果 最 好 。 
Java 6 的 脚本 API 成 就 了 JYM 上 多 语言 并 用 的 现象 。 我 们 举 了 Groovy 的 例子 ， 这 纯粹 是 因为 
第 2 革 刚 好 实现 了 一 段 Groovy DSL， 它 很 容易 无 颖 插入 到 Java 忆 用 程序 。 同 样 的 集成 手段 完全 适 
用 于 其 他 JVM 语 言 ( 例如 JRuby、Clojure 和 Rhino ) 编写 的 DSL。 
i 即使 在 单个 解答 域 中 ， 多 语言 并 用 现象 也 鼓励 使 用 多 种 语言 。 并 用 的 语言 需要 有 
良好 的 互 操作 性 ， 还 要 有 明晰 的 集成 入 口 。 通 常 并 用 的 语言 享有 共同 的 运行 时 平 
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台 ， 如 JVM， 其 上 的 语言 有 Java、Scala、Ruby、Groovy 等 。DSL 一 个 根本 的 设计 思路 就 

是 选择 最 适合 的 语言 设计 领域 API， 然 后 通过 共同 的 运行 时 平台 将 之 与 核心 应 用 程序 集 

成 在 一 起 。 

DSL 可 以 集成 到 不 同 层次 。3.2.1 节 中 探讨 的 Java 脚 本 方案 允许 将 DSL 衣 人 到 ScriptEngine 
执行 框架 ， 然 后 调用 DSL 脚 本 。 它 的 优点 是 DSL 完 全 与 应 用 主体 解 耘 ,在 sczriptEngine 的 沙 使 
中 执行 ; 缺点 是 DSL 组 件 不 容易 和 应 用 程序 的 主体 环境 交互 ， 操 作 不 直观。 

下 面 我 们 来 看 为 一 种 DSL 集 成 方式 , 它 的 工作 层次 不 同 于 脚本 引擎， 而 且 与 应 用 程序 的 答 主 
语言 结合 得 更 为 紧密 。 


3.2.2 ”通过 DSL 包 装 器 集成 


在 这 种 集成 方式 下 ,我 们 利用 其 箱 主 语言 的 丰富 特性 , 将 DSL 构 建成 主体 应 用 程序 组 件 外 面 
的 包 净 层 。 遗 留 系统 很 适合 采用 这 种 方式 将 其 对 外 接口 改造 成 更 灵巧 的 API。JVM 语 言 大 多 提供 
了 相当 丰 军 的 语言 特性 ， 完 全 有 能 力 将 遗留 抽象“ 竣 饰 ”成 更 具 表 现 力 的 领域 组 件 。 对 于 改造 结 
A. 不仅 领域 用 户 会 很 满意 ， 而 且 开 发 者 中 的 API 用 户 也 会 乐 见 其 成 。 

1. 示例 

这 次 的 示例 中 我 们 使 用 Scala 语 言 ， 它 是 JVM 上 的 静态 类 型 语言 ， 有 完善 的 Java 互 操作 能 力 。 
假设 你 的 应 用 程序 主体 是 用 Java 写 成 的 , 而 且 所 有 领域 对 象 都 已 包含 其 中 。 这 时 客户 因为 受 了 “中 
惑 ” 想 试 试 基于 DSL 的 开发 ， 所 以 要 求 你 在 现 有 的 Java 交 易 系 统 上 增加 一 些 光 侠 的 DSL 特 性 。 这 
种 场景 正好 适合 包 妆 式 集 成 。 

为 了 便于 解释 包装 式 集 成 概念 ， 我 会 采用 另 一 个 证 券 交 易 的 例子 进行 讲解 。 图 3-6 大 体 展 示 了 
交易 过 程 。 别 志 了 看 一 下 补充 内 容 “ 金 融 中 介 系 统 : 客户 账户 ”, 你 需要 知道 里 面 介 绍 的 育 景 信息 。 
























































le esito. 客 尸 账户 

为 了 完成 交易 ， 客 户 需要 在 STO (Stock Trading Organization, 证 券 交 易 组 织 ) 开设 一 个 账 
户 ( 称 为 交易 账户 )，、 客 户 参 与 的 所 有 交易 都 被 记 入 这 个 账户 ， 并 在 STO 贸 有 交易 记录 。 一 旦 
成 交 ， 结 算 过 程 就 必须 启动 。 结 算 过 程 核算 出 交易 双方 各 自 结 余 的 证 券 和 现金 数量 。 

来 看 例子 。 客 户 XXX 通 过 STO 野 村 证 券 买 入 100 股 索尼 的 股票 ， 每 股 为 50 美 元 。STO 从 交 
苑 所 获得 某 中 介 卖 出 的 证 券 。 成 交 后 有 个 结算 过 程 ， 交 易 双 方 在 此 过 程 中 互 换 100 股 索尼 股票 
和 约 5000 美 元 。 结 算 在 一 个 账户 上 进行 ( 称 为 结算 账户 )， 这 个 账户 可 以 和 客户 的 交易 账户 相 
同 ， 也 可 以 是 另 一 个 账户 。 

总 之 , 交易 账户 用 米 交 易 , 结算 账户 用 来 结算 交 萄 。 两 个 账户 可 以 相同 也 可 以 不 同 。 图 3-6 
是 交易 、 结 算 过 程 的 概略 图 。 


来 看 Account (账户 ) 领域 模型 。 账 户 是 证 券 交 易 领域 的 一 个 实体 ， 券商 、 客 户 、 中 介 都 通 
过 它 来 管理 交易 和 结算 活动 ,刚刚 的 补充 内 容 简 单 介绍 了 交易 和 结算 操作 中 出 现 的 不 同 账户 类 型 
和 它们 的 功用 。 
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结算 账户 









账面 和 流水 账 









图 3-6 ”交易 账户 和 结算 账户 在 交易 过 程 中 的 作用 


要 是 记 不 清楚 “交易 ”和 “结算 ”在 此 领域 中 的 确切 含义 ,请 回顾 第 1 章 和 第 2 章 
的 补充 内 容 。 


代码 清单 3-4 就 是 Account 实体 的 领域 模型 ， 我 们 用 它 来 讨论 包装 式 DSL 集 成 。 代 码 中 略为 
删 减 了 一 些 不 重要 的 细节 。 我 们 将 要 实现 的 Scala 包 装 器 就 建立 在 Account 这 个 Java 类 基础 之 上 。 
看 过 这 个 例子 ， 你 将 看 到 包装 器 模式 对 客户 API 的 改造 成 效 ， 由 API 组 织 起 来 的 语句 结构 将 更 为 
精干 和 具有 表现 力 。 


代码 清单 3-4 ” Java 语言 编写 的 Account 领 域 模型 


public class Account { 
public enum STATUS { OPEN, CLOSED } 














public enum TYPE ( TRADING, SETTLEMENT, BOTH j 


private String number; 

private String firstName; 

private List«String» names = new ArrayList«String»(); 
private STATUS status - STATUS.OPEN; 

private TYPE accountType - TYPE.TRADING; 

private double interestAccrued = 0.0; 


public Account (String number, String firstName) { 
this.number = number; 
this.firstName = firstName; 
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public Account (String number, String firstName, TYPE accountType) { 


this(number, firstName); 


this.accountType = accountType; 

j 

// 肖 略 了 获取 万 法 

public double calculate(final Calculator c) ( 
interestAccrued = c.calculate(this); 


return interestAccrued: 


} 


public boolean isOpen() { 
return status.equals(STATUS.OPEN); 


} 


public Account addName (String name) { 
names.add (name); 
return this; 


j 

如 果 你 曾经 做 过 Java 编 程 , H XE C. £60] f aH £R3-A rz RA R ERU RE. POBRTI VILE UE 
不 怪 了 。 让 我 们 试看 把 抽象 变 得 更 灵巧 一 点 , 给 客户 准备 一 一 领域 味道 更 浓 、 表 达 更 目 如 的 API。 
到 时 候 ， 我 们 的 DSL 和 Java 应 用 程序 将 真正 血脉 相连 ， 犹 如 一 体 。 

2. 建造 DSL 

首先 , RIJE —" lh Scala AaccountDSL A Javak account hilz , 实现 所 请 的 灵巧 领 
HAPI, 我 们 必须 给 Account 类 披 上 极其 灵巧 的 外 衣 ， 不 管 DSL 如 何 设 计 ， 让 用 户 都 可 以 把 DSL 用 
于 现 有 的 Account 类 实例 ; 这 是 最 终 目 标 。 后 续 几 上段 代码 将 问 你 演示 如 何 逐 步 强化 AccountDSL 
抽象 。 随 后 我 们 还 会 讨论 可 能 出 现 的 DSL 使 用 情形 ， 让 你 感受 一 下 领域 抽象 的 强化 成 果 。 

代码 清单 3-5 是 用 Scala 编 写 的 DSL 层 ， 它 将 与 Java 类 Account 无 颖 集成 使 用 。 























代码 清单 3-5 ”用 Scala 语 言 编 写 的 AccountDSL 


class AccountDSL(value: Account) { 


import scala.collection.JavaConversions.. . 将 Java 集 合 转换 
def names = 7jScalaf& & 
value.getNames.toSeq.toList ::: List(value.getFirstName) 
def belongsTo(name: String) = { 
(name -- value.getFirstName) || (names exists(  -- name)) P 
} 
def ««(name: String) = { 
value.addName (name) P 作用 于 集合 的 新 运算 符 
this 
} 
Id wa 


} 
代码 中 用 到 一 些 由 型 的 Scala 惯 用 法 ， 请 参阅 补充 内 容 “Scala 基 础 知识 ”里 的 简要 介绍 。 欲 


详细 了 解 Scala 知 识 ， 请 参阅 3.7 节 文献 门 ]。 
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Scala 基 础 知识 
在 belongsTo 方 法 里 面 ， 我 们 写 了 一 名 断言 : 
>> (names exists( == name)) 
它 其 实 是 一 种 简略 写法 ， 意 思 等 同 于 以 下 Scala 代 码 : 
>> (names.exists(n => n == name)) 


(1) 在 Scala 语 言 里 ， 调 用 方法 的 时 候 方法 和 接收 者 之 间 的 点 符号 ( . ) 是 可 选 的 。 

(2) 在 Scala 语 言 里 ， 下划线 符号 (_) 可 以 作为 简写 记号 代表 别 的 东西 。 代码 清单 3-5 中 的 _ 
是 当做 占 位 符 使 用 的 ， 提 供 参 数 给 exists 所 接受 的 高 阶 函 数 。 

(3) exists 所 接受 函数 的 参数 类 型 由 Scala 类 型 推断 器 进行 推断 。 

(4)4&Scalai& & €, i& JL ALAE ZiRS AXI ST VAEGU— INIRE PE A R UST 
法 。 有 些 人 党 得 像 << 这 样 的 运算 符号 比较 好 看 ， 但 我 必须 提醒 一 下 ， 好 看 与 否 完全 属于 个 人 
喜好 ， 如 果 用 得 太 多 反而 可 能 降低 代码 的 可 读 性 。 





代码 清单 3-$ 中 的 AccountDSL 是 Java 类 Account 的 适 配 需 , Account HORR, 成 为 了 
AccountDSL 的 底层 实现 ,在 人 @ 的 位 置 , 我 们 为 了 方便 后 面 的 高 阶 函数 , 把 Java 集 合 转换 成 了 Scala 
集合 。( Scala 集 合 上 可 以 施用 高 阶 函 数 ， 所 以 更 能 表达 清楚 一 些 操作 的 意思 ， 在 这 个 意义 上 说 ， 
Scala 集 合 的 语义 总 是 比 Java 集 合 更 丰富 。) 这 里 用 到 了 Scala 2.8 才 有 的 Java、Scala 集 合 隐 式 
(implicit) 转换 功能 ， 如 果 你 用 的 Scala 版 本 比较 低 ， 可 以 改 用 jcl 转 换 API: 


def names = 
(new BufferWrapper[String] { 
def underlying = value.getNames 
}) .toList ::: List(value.getFirstName) 


我 们 还 定义 了 一 个 领域 API belongsTo ,, HFAA T A N KRR KA Scalafi 
合 。 这 个 地 方 充分 体现 了 Scala 紧 凑 的 特点 。 最 后 ,我 们 为 了 DSEL 的 表现 力 和 简洁 性 ， 特 意 定 义 出 
像 << 这 样 类 似 运算 符号 的 语法 合 。 

新 的 Scala API 包 北 了 原来 的 Java 实 现 , 不 久 我 们 也 将 见识 到 客户 走样 用 新 的 简洁 语法 表达 其 
领域 意图 。 表 现 力 和 简洁 性 是 DSL 驱 动 开 发 的 主要 优点 ， 我 们 的 例子 清楚 地 展现 了 DSEL 的 力量 。 

3. 利用 Scala 的 隐 式 特性 

在 将 视角 转 回 客户 pad Bij , 我 们 还 有 一 件 事 情 需要 解释 o 只 有 Account 和 AccountDSL 之 间 能 
互 操作 ，aAccountDSL 上面 建立 的 各 种 机 巧 才能 应 用 到 Account 实 例 。 通 过 Scala 的 隐 式 特性 ， 我 
们 可 以 让 AccountDpSi 具 备 的 任何 功能 同时 对 Account 类 的 实例 生效 。 我 们 所 要 做 的 ， 只 是 在 词 
法 作用 域内 定义 一 个 隐 式 转换 : 


implicit def enrichAccount(acc: Account): AccountDSL = 
new AccountDSL(acc) 


这 样 就 可 以 透明 地 从 Account 转 换 成 AccountDsL， 之 后 你 就 可 以 在 Account 实 例 上 使 用 新 
的 DSL APIT 。 现 在 ， 我 们 创建 几 个 Java 类 Account 的 实例 : 


wel ecco 



































new Account ("acc-1", "David P.") 


val acc2 new Account("acc-2", "John S.") 


val acc3 new Account("acc-3", "Fried T.") 
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Scala 的 隐 式 特性 

enrichAccount 方 法 定义 前 面 有 个 ijmplicit 修 饰 符 。 在 Scala 语 言 中 ，implicit 修 饰 符 
用 于 方法 表示 定义 从 一 个 类 型 到 另 一 个 类 型 的 自动 转 挽 。 在 这 里 ，enrichAccount 方 法 将 一 
个 Account 实 例 转 换 成 AccountDSL 实 例 。 使 用 中 并 不 需要 写成 : 

scala> enrichAccount (acc1) belongsTo("David P."), 

你 可 以 直接 在 Account 实 例 上 调用 AccountDSL 的 方法 : 

scala» acci belongsTo("David P.") 

就 好 像 AccountDSL 的 全 部 方法 都 注入 到 了 Account 类 一 样 。 是 不 是 有 点 象 Ruby 的 猴子 补 
T (monkey patching ) ?我 们 可 以 用 Ruby 的 猴子 补丁 打开 任意 类 ， 并 向 里 面 添加 方法 。 

不 过 Scala 的 情况 有 些 不 一 样 : implicit 被 限制 了 词法 作用 域 。Account 和 RAccountDSL 之 
闻 的 自动 转换 只 存在 于 enrichAccount 方 法 的 词法 作用 域内 。 而 Ruby 的 开放 类 允许 在 全 局 作用 
域内 修改 现 有 类 ， 这 是 很 大 的 不 同 。3.7 节 的 文献 [3] 深 入 分 析 了 Scala 语 言 中 隐 式 特性 的 优点 。 


现在 ,我 们 使 用 新 的 << 运 算 符 把 将 几 个 账户 所 有 人 的 名 字 加 到 账户 acc1: 

acclI << "Mary R." << "Shawn P." << "John S." 

Ex EU Fr RRR S RARER, [HPEERUSAS UA Java API 写 出 来 是 
这 样 的 : 

acc1.addName ("Mary R.").addName("Shawn P.").addName("John S."); 


接 者 我 们 把 几 个 账户 组 成 集合 ， 对 于 账户 所 有 人 中 包含 “John S.” 的 ， 都 打印 出 账户 所 有 人 
的 名 字 (firstName): 


val accounts = List(accl, acc2, acc3) 














accounts filter(_ belongsTo "John S.") map(. getFirstName) foreach(println) 

表现 力 真 好 ， 跟 原本 使 用 Java API fS] ELA n] [8] His NARKI AA T Scalaift zi 
的 丰富 表达 手段 ， 它 使 我 们 能 用 一 组 更 紧凑 的 API 表 达 出 更 充沛 的 语义 。 上 面 的 代码 片段 运用 
filter、map、foreach 组 合子 来 操作 高 阶 吨 数 ， 比 命令 式 的 Java 语 法 利落 得 多 。 有 没有 感觉 到 
一 点 兴奋 ? 我 们 继续 吧 ! 

取得 属于 John S. 的 账户 列表 ， XI TUB TRIS COE SE BI ( threshold ) 的 所 有 账户 合计 
其 应 付 利息 (accruedInterest ): 


accounts.filter(  belongsTo "John S.") 




















.map( .calculate(new CalculatorImpl)) 
.filter( > threshold) 
.foldLeft(0.0)( + _) 





上 面 的 代码 片段 运用 了 之 前 补充 内 容 中 讲解 过 的 一 种 Scala 惯 用 法 。filter 后 面 的 断言 有 个 
需要 推 源 类 型 的 参数 ，_ 就 是 代表 这 个 参数 的 占 位 符 。 类 似 Java 那 样 语法 烦琐 的 语言 就 没 办 法 把 
领域 问题 表达 得 像 这 里 一 样 清 楚 。 第 1 章 就 说 过 ， 这 一 切 部 归功 于 Scala 等 更 强大 语言 丰富 的 抽象 
设计 能 力 ， 它 们 减少 了 代码 中 的 非 本 质 复杂 性 (accidental complexity )。 

注意 作为 calculate () 方法 输入 使 用 的 CalculatorImpl 对 象 。 Calculator 是 在 Java 中 定 
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义 的 接口 ， 而 calculatorImpl 是 其 实现 . 


public interface Calculator { 
double calculate(Account account); 


} 


public class Calculatorimpl implements Calculator { 


GOverride 
public double calculate(Account account) { 
/ / 具体 实现 
} 
j 


大 多 数 时 候 ， 传 递 给 Account#calculate() 方 法 的 参数 总 是 calculator 接 口 的 同一 个 实 3 





现 ， 这 时 可 以 利用 DI 在 运行 时 动态 注入 实现 以 避免 代码 重复 。 不 过 ，Scala 可 以 提供 更 好 的 办 法 : 
把 这 一 参数 隐 含 在 所 有 的 calculate 调 用 中 。 


class AccountDSL(value: Account) { 


// 同 上 一 段 
def calculateInterest( 
implicit calc: Calculator): Double = { 
valuecalceulatetcale) P 隐 含 的 caLculLatozr 实 例 


} 
} 


上 面 的 代码 给 calculateInterest 方 法 定义 了 一 个 implicit 参 数 ,并 且 在 DSL 的 执行 作用 
域内 设置 该 implicit 参 数 的 默认 值 @。 现 在 ,我们 给 calculator 规 定 了 一 个 隐 含 的 默认 实现 ， 
不 再 需要 每 次 调用 calculateInterest 方 法 都 传递 一 个 calculator 实 例 。 最 后 ， 计 算 John S. 
名 下 所 有 账户 的 应 付 利 乱 束 变 成 这 个 样子 : 


implicit val calc = new CalculatorImpl 








accounts.filter(  belongsTo "John S.") 
.map( .calculateInterest) 
.filter( > threshold) 
.foldbLeft(0.0)( + ) 


ATHE., 高 阶 孙 数 等 特性 的 协助 ，Scala 能 够 定义 非常 目 然 的 控制 抽象 , 甚至 给 人 感觉 就 像 
语言 内 建 的 语法 一 样 。 即 使 底层 实现 是 Java 对 象 ， 也 不 妨碍 我 们 设计 出 强力 的 控制 结构 ， 成 就 简 
洁 明 了 的 DSL。 

4. 市 给 用 户 的 利益 

我 们 在 第 1 草 就 说 过 ， 设 计 DSL 的 目的 并 不 是 让 不 懂 编 程 的 领域 用 户 用 它 写 代码 。 所 谓 设 计 
得 当 的 DSL， 重 点 是 API 要 突显 其 沟通 作用 。 上 一 段 代 码 中 出 现 的 map 、filter、foldLeft 等 
哨 数 式 编程 的 组 合子 , 其 实 对 于 领域 人 员 来 说 并 不 好 理解 。 但 领域 人 员 不 难 在 上 述 代码 厂 段 中 看 
到 以 下 几 个 要 点 : 

口 过 滤 出 属于 John S. 的 账户 ; 

口 对 其 计算 利息 ( calculateInterest ); 

口 过 滤 出 大 于 国信 的 值 ; 
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OQ 合计 所 有 的 利明 值 。 

当 你 在 代码 局 部 集中 呈现 这 些 信息 要 点 , 领域 专家 就 比较 容易 理解 并 验证 业务 逻辑 。 如 果 采 取 
命令 式 的 写法 ,同样 的 逻辑 很 可 能 散布 在 较 大 范围 的 代码 片段 里 ,不 懂 编 程 的 人 很 难 理 清 其 逻辑 。 

我 们 接 下 来 就 用 Java 对 象 人 Account 和 代码 清单 3-5 中 实现 的 AccountDSL 定 义 一 个 控制 抽象 : 


object AccountDSL { 
def withAccount(trade: Trade)(operation: Account -» Unit) - ( 








val account - trade.account 
/ / 初始化 
Ery. i 
operation (account) 
} finally { 
/ /清理 
} 
} 
} 


这 段 代 码 用 到 的 两 个 抽象 Account 和 Trade ) 都 是 可 能 经 过 Scala 包 疙 大 强 化 的 Java 类 。 现 

在 轮 到 DSL 用 户 拿 这 些 抽象 来 做 点 有 用 的 领域 操作 了 o 有 刚才 的 wi thAccount 控 制 抽 象 再 加 上 

n e e 用 户 可 以 写 出 下 面 的 DSL 代 码 片 段 。 这 段 代 码 照 旧 比 纯 Java 
案 的 最 好 结 末 表现 力 更 蝇 ， 更 接近 于 领域 用 声 。 


withAccount(trade) { 
account => { 
settle( 
trade using 











account.getClient 


.getStandingRules 
.filter( .account == account) 
.first) 


andThen journalize 
j 
} 


上 面 一 连 串 的 API 调 用 做 了 些 什么 ， 看 看 图 3-7 就 清楚 了 。 


到 适用 iis 
得 到 账户 所 属 的 客户 户 的 第 一条 规则 记 入 账册 


PADAN ANAR i 


取 一 个 账户 取得 结算 篆 设 规则 按 规 则 结算 交易 
图 3-7 ”前面 代码 片段 的 流程 图 解 ， 分 步 说 明 从 取得 账户 到 事务 结束 的 全 过 程 
只 要 几 行 非常 前 i828 E Te AJ ji d FAS, withAccount EUN 能 做 这 人 么 ZE I8 o 如 果 把 这 一 小 


段 代码 拿 给 领域 专家 看 ， 他 肯定 能 给 你 解释 其 功能 。 我 就 拿 给 老 鲍 看 了 。( 还 记得 他 吗 ? 这 位 踢 
中 高 证 券 公司 的 领域 专家 从 1.4f 开始 ， 承 一 二 在 给 我 们 玫 忙 。) 你 猜 怎 么 看? 老 鲍 看 了 代码 ， 然 
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后 和 我 进行 了 下 面 这 么 一 番 对 话 。 

O 老 鲍 : 你 在 过 滤 之 后 ， 从 结算 常设 规则 里 面 选 其 中 的 第 一 条 ， 对 吧 ? 

口 我 : 没 错 ! 

O 老 鲍 : 但 有 时 候 可 能 有 好 几 条 规则 适用 于 同一 个 账户 。 

口 我 : 那 你 怎么 决定 应 该 选 哪 条 规则 ? 

O 老 鲍 : 在 这 种 情况 下 ， 每 条 规则 都 有 对 应 的 优先 级 。 你 应 该 选 优先 级 最 高 的 那 一 条 。 

OR: 好 ! 

下 回 你 的 经 理 再 说 DSL 的 前 期 投入 太 大 ， 你 就 把 刚刚 学 到 的 告诉 他 吧 。 不 见得 每 一 种 DSL 集 
成 都 需要 一 大 笔 开 文 。 本 小 节 讨 论 的 包 姜 需 方 式 承 是 实 实在 在 的 例证 。 这 种 方式 是 对 当前 Java 领 
域 模型 投资 的 增值 ， 回 报 给 你 的 是 更 灵巧 、 对 领域 专家 更 有 用 的 代码 。 

只 要 在 Java 应 用 程序 中 选择 Scala 作 为 DSL 实 现 语言 ,你 就 可 以 采用 DSL 包 污 器 手法 。Scala 的 
类 型 系统 有 办 法 把 Java 对 象 变 得 更 灵巧 ， 而 隐 陈 特性 是 其 秘诀 。 接 下 来 ， 我 们 学 习 如 何 利 用 一 些 
语言 特有 的 集成 手段 在 Java 之 上 实现 DSL。 这 次 我 们 又 回 到 Groovy 语 言 并 重 温 3.2.1 节 讨论 过 的 
DSL 示 例 。 


3.2.8 ”语言 特有 的 集成 功能 


我 们 重 温 3.2.1 市 集成 到 核心 Java 应 用 程序 的 那个 交易 单 处 理 DSL。 但 这 次 不 用 script 
Engine 来 集成 ， 而 是 在 Java 应 用 程序 中 动态 载 和 人 Groovy 类 的 技巧 。 动 态 类 加 载 保 证 Groovy 对 象 
即使 内 骸 于 核心 Java 应 用 程序 ， 仍 然 有 很 好 的 可 操纵 性 。 


£c 元 编程 、 闭 包 、 委 托 等 Groovy 知 识 详 见 3.7 节 文献 [2]。 


























1. Java 代 码 与 Groovy DSL 之 间 的 通信 

假设 Java 交 易 程 序 已 经 用 Java 6 的 ScriptEngine 集 成 了 交易 单 处 理 DSL。 一 切 都 运行 得 很 好 ， 
直到 有 一 天 客户 拿 来 了 新 的 需求 : 从 脚本 返回 给 Java 应 用 程序 主体 的 交易 单 集合 还 需要 一 些 额 外 的 
处 理 。 具体 来 说 , 我 们 需要 计算 当前 所 下 全 部 交易 单 的 总 值 , 还 要 为 客户 定制 交易 单 上 显示 的 项 目 。 

在 之 前 的 方案 里 ，DSL 实 现 (ClientOrder.gcgroovy ) 和 用 户 脚 本 (order.dsl) 被 合成 
一 段 Groovy 脚 本 ， 放 进 ScriptEngine 的 沙 盒 中 执行 。Groovy DSL 对 于 Java 代 码 完全 不 透明 ; 
Groovy 脚 本 和 Java 类 分 别 由 不 同 的 类 装载 需 载 人 ， 所 以 脚本 内 容 对 于 应 用 程序 主体 是 不 可 见 的 。 
为 了 满足 客户 的 需求 ， 我们 必须 找 一 种 办 法 让 Java 应 用 程序 接触 Groovy 类 ， 这 就 要 费 一 番 功 夫 更 
换 DSL 集 成 方案 。 

2. 利用 Groovy 类 装载 器 进行 更 好 的 集成 

这 里 ， 作 为 DSL 实 现 环节 的 Groovy 类 将 成 为 Java 应 用 程序 内 可 重用 的 抽象 ， 而 作为 DSL 使 用 
环 方 、 由 用 户 编写 的 交 多 单 处 理 脚本 才 由 GroovyClassLoader 加 载 。 代码 清单 3-6 展 示 的 儿 处 修 
改 可 令 DSL 更 符合 Groovy 风 格 。 
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代码 清单 3-6  RunScriptjava: 利用 GroovyClassLoader 集 成 DSL 


public class RunScript { 
public static void main(String[] args) 


throws CompilationFailedException, IOException, 


InstantiationException, IllegalAccessException í( 


final ClientOrder clientOrder - 
new ClientOrder(): 


hi 设置 元 类 


clientOrder.run(); 加 载 Groovy 类 
final Closure dsl = 
(Closure)((Script) new GroovyClassLoader().parseClassq( 
new File("order.dsl")).newInstance()).run():; 


dsl.setDelegate(clientOrder); 
final Object result = dsl.call(); 


' 给 闭 包 设置 委托 


List<Order> r = (List«Order») result; 执行 DSL 
int val = 0; 
for (Order x Era 
val += (Integer) (x.getValue()); 6 处 理 结果 集合 


} 


System.out.println(val); 


} 


我 们 一 步 步 解 释 这 段 代 人 码 怎 样 增强 DSL 集 成 的 Groovy 味 道 。 我 们 分 离 出 clientoOrder. 
groovy 抽 象 ， 预 编译 ,使 0rdger 类 可 用 于 Java 应 用 程序 。 在 上 面 的 Java 类 中 ， 我 们 运行 
clientorder 的 一 个 实例 ， 以 设置 元 类 @。D5SL 肢 本 order.dsl 返 回 一 个 内 含 DSL 代 码 的 
Closure), 接着 ,我 们 设置 cl1ientorder 为 Closure 的 委托 ， 以 解析 脚本 中 的 符号 会。 然后 ， 
我 们 执行 DSL 肢 本， 获得 一 个 order 对 象 的 列表 全。 最 后 ， 我 们 遍历 所 有 的 order 对 象 ， 求 得 交 





J Æ, nie. 


DSL 脚 本 一 执行 完 ， 我 们 就 得 到 一 个 order 对 象 的 列表 ， 十 分 方便 后 续 的 业务 处 理 。 而 按照 


之 前 代码 清单 3-3 中 的 方案 ， 通 过 Java 6 脚本 API 进 行 集成 ， 就 做 不 到 这 


的 结果 ， 而 你 也 学 到 了 一 种 集成 Groovy 到 Java 应 用 程序 的 新 方法 。 
9. 最 终结 果 


一 点 。 客 户 应 该 满意 这 样 





DSL 脚 本 ordqer .as1 现 在 变 成 下 面 的 样子 ， 改 为 回 Java 应 用 程序 


代码 清单 3-7 order.ds1: DSL 脚 本 改 为 返回 一 个 Closure 


{ 一 > 
orders = I] 
ord1 = 
newOrder.to.buy(100.shares.of('IBM')) { 
limitPrice 300 
allOrNone true 
valueAs (qty, unitPrice -> qty * unitPrice - 500} 


I 


orders << ordi 


ord2 = 


返回 一 一 个 Closure。 
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newOrder.to.buy(150.shares.of('GOOG')) { 
limitPrice 300 
allOrNone true 
valueAs (qty, unitPrice -> qty * unitPrice - 500} 


} 


orders << ord2 


ord3 = 
newOrder.to.buy(200.shares.of('MSOFT')) { 
limitPrice 300 
allOrNone true 
valueAs (qty, unitPrice -> qty * unitPrice - 500} 


} 


orders << ord3 


println "Orders ..." 
orders.each { println it } 


) 

现在 的 Groovy 交 易 单 处 理 DSL 与 第 2? 章 中 的 相 比 又 进步 了 一 些 ， 而 且 它 与 Java 集 成 的 效果 也 
F53.2.1 9 HJScriptEngineZ; SE HH PE, 

介绍 完 语 言 特有 的 集成 功能 ， 下 面 介绍 一 种 基于 框架 的 内 部 DSL 集 成 方 宁 。Spring 提 供 了 这 
样 的 平台 ， 我 们 来 看 看 它 的 用 法 。 








3.2.4 基于 Spring 的 集成 


表 3-2 总 结 的 集成 手法 就 剩 下 最 后 一 种 未 介绍 了 。 本 下 要 介绍 的 集成 方案 通过 框 契 来 实现 ， 
论 抽象 层次 ， 它 比 前 面 那些 语言 层面 的 集成 方案 更 高 。 要 是 Java 应 用 程序 里 面 的 业务 规则 可 以 动 
态 修 改 ， 而 且 不 需要 重新 局 动 程序 ， 那 该 多 好 ; 你 会 不 会 销 滑 这 样 想 ? 

1. Spring 的 动态 语言 支持 

从 2.0 厂 开始 ，Spring 即 文 持 用 Ruby、Groovy 等 表现 力 强 的 动态 语言 所 实现 的 pean。( 欲 详细 
了 解 Spring， 请 访问 http:/www.springframework.orfg。) 这 类 bean 有 所 谓 的 “可 刷新 ”人 性质 ， 即 当 
其 底层 实现 发 生变 化 的 时 候 ， 可 以 动态 地 重新 装载 它们 。 来 看 一 个 金融 中 介 领 域 的 例子 。 假 设 有 
个 TradingService 实 现 ， 为 了 计算 附 上 县 债券 的 应 付 利 县 ， 需 要 查找 一 些 计算 规则 。 


public class TradingServicelmpl implements TradingService { 
private AccruedInterestCalculationRule accIntRule; 























d ! : , | 由 Spring 注入 的 
public wor oTrade(Trade trade) { 计算 规则 


// 具体 实现 
} 
} 


在 上 面 的 代码 片段 中 ， 应 付 利 息 的 计算 规则 经 由 Spring DI 在 运行 时 注 人 人 @@。 利 用 Spring 对 动 
态 语 言 的 支持 ， 我 们 可 以 选择 JRuby、Groovy、Jython 等 表现 力 好 的 语言 来 实现 这 些 规则 。 此 处 
的 场景 正好 适合 一 种 小 巧 、 内 泣 丰 宦 的 DSL 发 挥 作用 。 这 样 有 两 个 好 处 : 

a 因为 声言 本 身 内 溯 丰 主 ， 代 码 的 表达 更 到 位 ; 
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O 当 bean 的 底层 实现 发 生变 化 时 ， 其 运行 时 实例 可 以 目 动 重新 加 载 。 
就 当前 的 例子 而 言 ， 我 们 用 个 Java 接 口 来 定义 计算 规则 的 契约 : 
public interface AccruedInterestCalculationRule { 


BigDecimal calculate(Trade trade); 


] 
然后 规则 的 具体 实现 可 以 用 Ruby DSLÆ 5 : 


require 'java' 








class RubyAccruedInterestCalculationRule { 
def calculate(trade) 
/ / 具体 实现 
end 
end 


RubyAccruedInterestCalculationRule.new 
现在 就 剩 最 后 一 件 事 情 了 。 
2. 接 通 实现 
用 下 面 的 Spring XML 配置 片段 就 可 以 把 整个 实现 连接 起 来 。 现 在 ， 当 Java 程 序 需要 一 个 
AccruedInterestCalculationRule 实 例 的 时 候 ， 就 会 得 到 由 Ruby DSL 编 写 而 成 的 实例 。 
«lang:jruby 
id-"accIntCalcRule" 
refresh-check-delay-"5000" 
script-interfaces- 


"org.springframework.scripting.AccruedInterestCalculationRule " 
script-source-"classpath:RubyAccruedInterestCalculationRule.rb"-» 





«/lang:jruby» 

茶 喜 你 ， 你 成 功利 用 Spring 在 Java 应 用 程序 中 集成 了 Ruby DSL。 这 种 非 侵入 式 的 DSL 集 成 模 
型 使 DSL 组 件 与 使 用 它 的 上 下 文 解 厢 。 如 果 你 的 应 用 程序 正好 将 Spring 用 作 DI 框 架 ， 不妨 考虑 用 
这 种 集成 模式 解决 业务 规则 DSL 动 态 重 新 加 载 问题 。 

针对 内 部 DSL 的 同 质 集成 模式 至 此 介绍 完毕 ， 我 们 接 看 学 习 外 部 DSL 的 集成 模式 。 外 部 DSL 
形态 各 异 ， 其 语言 设施 也 可 能 是 专门 设计 的 。 下 一 节 ， 我 们 会 回顾 2.3.2 节 讨论 过 的 所 有 外 部 DSL 
实现 模式 ， 看 看 不 同 的 实现 方案 会 在 核心 应 用 程序 上 留 下 怎样 的 集成 人 口 。 注 意 ， 外 部 DSL 都 是 
特别 为 了 某 个 应 用 程序 而 定制 的 ; 我 们 对 于 外 部 DSL 集 成 模式 的 讨论 受 限于 几 种 常见 的 使 用 手法 。 


3.3 外 部 DSL 集成 模式 


怎样 在 应 用 程序 中 集成 XML? 你 会 立即 回答 :“ 使 用 XML 解析 句 !” 没 错 ! 因为 XML 不 同 于 
应 用 程序 的 宿主 语言 ， 所 以 需要 单独 的 解析 和 处 理 机 制 。XML 应 用 非常 广泛 ， 相 应 地 工具 非常 
多 ， 比 如 XPath、XQuery 等 ， 而 且 几 乎 随便 一 个 企业 解决 方案 都 会 市 上 各 式 各 样 XML 解 析 震 。 在 
应 用 程序 中 集成 XML 简 直 轻 而 易 举 ,然而 很 遗憾 ,我 们 为 应 用 程序 设计 的 外 部 DSL 没 有 这 样 的 “全 
套 行 头 ”。 集 成 我 们 的 外 部 DSL 到 应 用 程序 更 多 地 依赖 于 特殊 情况 下 的 特殊 举措 ， 难 以 推广 成 通 
用 的 模式 。 
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基于 上 一 段 中 的 说 法 ,你 恕 怕 觉 得 集成 外 部 DSL 会 是 软件 开发 中 的 一 场 亚 梦 。 是 否 如 此 则 取 
次 于 DSL 的 复杂 度 和 实现 技术 。 如 果 外 部 DSL 的 解析 融 是 采用 ANTLR 、YACC 等 标准 工具 来 开发 
的 ,那么 集成 起 来 还 是 很 简单 的 。 如 果 重 读 一 遍 2.3.2 节 ， 你 会 发 现 那里 描述 的 每 一 种 外 部 DSL 实 
现 模 式 ， 都 为 其 设计 产物 留 下 了 显而易见 的 集成 入 口 。 

那 我 们 就 再 细 数 一 遍 2.3.2 节 中 的 外 部 DSL 模 式 ， 试 试 找 出 它们 的 集成 人口。 表 3-3 对 于 如 何 
集成 外 部 DSL 到 应 用 程序 作 了 总 结 。 








表 3-3 ”外 部 DSL 的 集成 入 口 


























外 部 DSL 模 式 集成 入 口 

上 下 文 驱 动 的 字符 串 操 控 字符 串 经 过 分 词 处 理 被 转化 为 窒 主 语言 代码 , 这 一 过 程 中 用 到 了 正则 表达 式 匹配 和 
动态 代码 解释 等 技术 。 转 化 得 来 的 代码 片段 就 是 与 应 用 程序 集成 的 入 口 

XML 转换 成 可 使 用 的 资源 XML 解析 融 就 是 最 自然 的 集成 和 人口 。 经 过 解析 ，XML 被 转化 成 特 主 语言 中 的 数据 
结构 ， 可 被 应 用 程序 直接 使 用 

非 文本 表示 非 文本 表示 被 转化 成 AST。 以 AST 为 基础 ， 我 们 可 以 生成 多 种 形式 的 具体 语法 树 。 
只 要 根据 应 用 本 号 使 用 的 宿主 语言 生成 一 棵 该 语言 的 具体 语法 树 , 我 们 就 有 了 集成 
AH 

DSL'P AREE DSL/AP 5 | SEfz Pg ip E UR Pr T8 HABDSLPHENUXIS H Bj TOSS. Impe 


Big CR ED EJI pRBULACHCrB V 结果 得 到 内 网 代码 中 的 一 组 数据 结构 ， 由 于 语 
言 相同 ， 可 以 下 接 被 核心 应 用 程序 使 用 

基于 解析 融 组 合子 的 DSL 设 计 在 Scala 等 语言 中 , 解析 需 组 合子 被 实现 为 库 。 以 牡 主语 言 写 成 的 组 合子 就 是 解析 外 
训 DSL 的 规则 。 利 用 一 些 舱 入 的 答 主 语言 代码 ， 规 则 一 边 解 析 ， 一 边 填充 语义 模型 
的 数据 结构 。 当 规则 约 减 到 AST 的 最 高 节点 ， 我 们 束 得 到 了 完整 的 DSL 语 义 模型 


为 何 外 部 DSL 集 成 模式 讲解 得 不 如 内 部 DSL 集 成 模式 那么 详细 ?内 部 DSL 集 成 只 需要 傈 徘 宿 
主语 言 ， 而 外 部 DSL 根 据 其 领域 党 需要 种 类 不 确定 的 、 数 量 又 比较 多 的 全 套 设 施 。 比 起 用 答 主 语 
言 设 计 一 套 API， 语 言 处 理 设施 的 设计 没有 一 定之 规 。 因 此 ， 帮 脱离 了 具体 的 环境 和 和 要求 ， 我 们 
很 难 一 般 性 地 讨论 外 部 DSL 集 成 模式 。 第 7 革 和 第 8 革 将 以 具体 示例 来 详细 介绍 这 方面 的 技术 。 


i 第 7 齐 讨 论 如 何 用 ANTLR 设 计 DSL，ANTLR 是 常用 的 解析 器 生成 器 。 我 们 还 介绍 
了 利用 DSL 工 作 台 的 一 些 外 部 DSL 生 成 工具 。 另 外 ， 针 对 采用 ANTLR 和 DSL 工 作 
侣 两 种 方式 下 产生 的 外 部 DSL， 我 们 还 介绍 了 如 何 将 DSL 与 核心 应 用 程序 集成 。 

第 8 章 详 细 介 绍 了 如 何 利 用 Scala 解 析 器 组 合子 设计 外 部 DSL。 


我 们 已 经 介绍 完毕 内 部 DSL 和 外 部 DSL 的 所 有 集成 模式 ， 这些 模 式 足以 应 对 工作 中 的 大 部 分 
情况 。 全 篇 讨论 都 假定 核心 应 用 程序 是 以 Java 开 发 的 ， 而 准备 集成 的 DSL 则 是 以 表现 力 更 强 的 语 
言 写 成 的 。 这 个 假设 符合 现实 中 最 常见 的 情况 ， 所 以 请 务必 充分 理解 本 章 讨 论 的 这 些 集成 问题 。 

本 章 一 开篇 就 在 图 3-1 中 展示 了 DSL 驱 动 应 用 程序 开发 中 头等 重要 的 问题 :集成 DSL 到 核心 应 
用 程序 。 但 不 时 有 些 开 发 者 忘 了 提前 规划 这 个 问题 ,直到 开发 后 期 才 开 始 考虑 。 我 们 即将 讨论 的 
下 一 个 问题 ， 也 时 常 在 起 始 阶段 被 开发 者 忽略 : 决定 错误 及 异常 处 理 的 策略 。 这 是 一 件 应 该 优先 
去 做 的 事情 ， 尤 其 是 DSL 的 用 户 基数 比较 大 的 时 候 。 
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3.4 ”处 理 错误 和 异常 


给 用 户 看 到 友好 的 错误 报告 ， 其 重要 性 绝 不 低 于 提高 DSL 语 法 的 表现 力 。 因 为 DSL 是 一 种 应 
用 范围 受 限 的 声言 ， 错 误 消 息 也 应 该 适应 其 应 用 范围 ， 用 领域 请 言 去 表达 。DSL 环 境内 的 错 旋 和 
异 弟 报告 要 有 蕴 可 循 ,不 能 误导 用 户 和 造成 困惑 。 报 告 中 要 清 芍 说明 系 统 所 处 的 确切 状况。 这 种 
设计 思路 叫做 领域 驱动 的 异 篆 报 告 ， 详 见 3.4.1 节 。 我 们 还 会 讲 到 DSL 用 户 可 能 面 对 的 两 种 主要 类 
型 的 错误 状态 。 以 上 几 点 要 求 共 同 构成 了 错误 和 开 并 处 理 策略 的 三 大 文 柱 , 是 DSL 设 计 者 不 可 忽 
略 的 参考 视角 ， 如 图 3-8 所 示 。 























清楚 地 命名 异 弟 状态 以 用 户 可 理解 的 领域 
语言 来 处 置 系统 民间 


清楚 地 报告 用 户 打 
字 失 误 造 成 的 错误 


图 3-8 ” DSL 错误 和 异常 状态 处 理 策 略 的 三 大 支柱 
根据 DSL 的 内 部 、 外 部 之 分 , 以 及 实现 语言 的 区 别 ,， 错误 状态 的 呈现 方式 也 有 所 不 同 。 表 3-4 








忆 结 了 有 关 错 误 、 寞 闸 的 得 解 问题 ,还 有 你 映 为 DSL 设 计 者 的 责任 。 


表 3-4 ”关于 DSL 错 误 和 异常 ， 你 应 该 知道 的 一 些 事 





每 解 问题 DSL 设 计 者 的 解决 之 道 
你 需要 清楚 声明 DSL 内 的 异常 状态 异常 状态 也 是 领域 抽象 。 应 当 一 直 使 用 领域 语言 来 表述 过 











程 中 可 能 发 生 的 任何 异常 。 详 见 3.4.1 市 
当 用 户 输 错 了 方法 名 、 对 象 名 或 者 其 他 语言 成 分 ， 你 需 ”具体 策略 取决 于 所 用 的 实现 语言 。 详 见 3.4.2 节 
要 处 理 因此 产生 的 错误 
当 系 统 进入 无 效 的 业务 状态 ,你 需要 人 处理 因此 出 现 的 异 ”在 报告 此 类 异常 的 时 候 ， 请 务必 以 用 户 可 以 理解 的 语言 提 
常 。 例 如 ， 当 与 银行 的 通信 中 断 时 ， 知 有 人 试图 转账 一 “” 供 所 有 相关 详情 。 详 见 3.4.3 节 
笔 资金 ， 会 发 生 什 么 事 呢 











下 面 我 们 就 详细 探讨 这 几 个 问题 。 
3.4.1 给 异 弟 命名 
给 DSL 里 的 异常 状态 命名 的 时 候 , 我 们 应 该 采用 领域 用 户 的 用 语 描 述 那 种 情况 。 异 常 不 一 定 


是 设施 出 了 毛病 , 可 能 只 是 业务 用 例 中 的 一 条 分 文 。 命 名 的 重点 是 通过 领域 语汇 将 情况 呈现 出 来 。 
下 面 的 例子 来 目 一 个 对 交易 双方 账户 进行 结算 的 系统 : 
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val fromBalance = fromAccount.getSecurityBalance 
if (fromBalance «- tradeQuantity) 
throw new SettlementFailedException( 


" Insufficient security balance in " + 
"account " + counterpartyAccount.getName + 
" for settlement completion") 

settle(..) 





系统 遇 到 了 异常 状况 ; 当 卖 家 的 证 券 余 额 不 足 的 时 候 , 结算 将 失败 。 事件 的 状态 已 经 通过 异 
各 名 SettlementFailedqException 表 达 出 来 ， 其 措 群 也 符合 现实 中 结算 系统 的 一 般 用 十。 妆 
用 户 看 到 这 个 异常 ,他 立即 就 会 明白 当前 的 情况 。 而 且 ， 他 还 会 在 异常 附带 的 消息 里 看 到 详细 的 
失败 原因 。 


3.4. ”处 理 输入 错误 


不 管 DSL 语 言 多 么 目 然 , 用户 还 是 会 号 错 , 这 是 人 类 本 性 ,如果 所 用 编程 语言 是 像 Scala 和 Java 
这 样 的 静态 类 型 语言 , 编译 器 会 在 错误 发 生 时 立即 给 你 提醒 。 只 要 你 违反 了 语言 类 型 系统 的 规则 ， 
Zi FEL x De er C ERER, ABIEI3-99 TR 


你 的 程序 ， 用 着 
态 类 型 语言 写成 


























图 3-9 ”编译 肯 就 像 警 察 一 样 发 挥 警 示 作 用 


如 果 用 户 对 实现 DSL 的 宿主 语言 有 足够 的 了 解 , 编译 需 报 告 的 错误 消息 将 很 有 帮助 。 现 代 IDE 
都 带 有 代码 助手 和 上 自动 补 全 功能 ,有 利于 防范 输入 错误 。 可 是 ,如 果 没 有 这 些 帮 助 又 该 怎么 办 呢 ? 

1. 当 类 型 系统 不 可 用 时 

像 Ruby 和 Groovy 那 样 的 动态 类 型 语言 没有 编译 融 帮 忙 找 出 类 型 错误 。 在 这 些 语 言 里 ， 类 型 
错误 大 多 要 经 过 语言 的 方法 分 发 流水 线 处 理 之 后 作为 运行 时 错误 呈现 出 来 。 即 使 没有 编译 时 的 钳 
误 检 查 ， 也 不 妨碍 设计 得 当 的 DSL 发 挥动 态 语言 的 优势 来 达到 目的 ， 比 如 利用 methodaMissing 
特性 来 设置 友好 的 错误 处 理 程序 ， 向 DSL 用 户 传达 纠正 错误 所 需 的 信息 。 

对 于 使 用 动态 语言 来 设计 DSL 而 言 ， 采 用 methodqMissing 是 非常 有 用 的 技巧 。 下 面 的 Ruby 
示例 就 为 方便 用 户 理 解 运 行 时 异常 补充 了 足够 的 上 下 文 信息 : 

class Trade 


D ua 
def method missing(method, *args, &block) 



































raise NoMethodError, ««ERRORINFO 
method: #{method} 
args: #{args.inspect} 
on: #{self.to_yaml} 
ERRORINFO 
end 
"NM 


end 


如 采用 户 输入 了 Trade 对 象 中 不 存在 的 方法 名 ，Ruby 将 默认 抛 出 一 个 NoMethodError。 而 
EMRA RKI method missing 来 充当 定制 的 错误 处 理 程 序 , 可 以 向 用 户 提供 更 多 上 下 
文 信息 。( 至 于 在 Groovy 中 利用 methodMissing 合 成 新 方法 的 例子 ， 请 翻阅 2.2.2 市 。) 

2. 语法 解析 器 的 功用 

对 于 外 部 DSL, 解析 需 在 解析 输入 脚本 的 过 程 中 需要 确保 报告 输入 字符 串 发 生 错误 的 准确 行 
写 和 位 置 ,错误 报告 的 友好 程度 非常 依赖 于 生成 DSL 语 法 解析 此 所 采用 的 技术 ,在 错误 报告 方面 ， 
ANTLR 生 成 的 目 顶 回 下 型 解析 融 比 YACC 的 目 底 向上 型 解析 天 文 持 性 更 好 。 在 第 7 章 讨 论 通 过 解 
析 融 生成 硕 设 计 外 部 DSL 的 时 候 ， 我 们 会 详细 解说 这 部 分 内 容 。 

好 了 ， 对 于 注定 要 出 现 的 用 户 输入 错误 ， 你 已 经 知道 该 怎样 对 付 了 。 那 么 ， 如 果 业 务 状 态 出 
了 了 错误， 该 怎么 办 呢 ? 


3.4.3 ”处 理 异 帅 的 业务 状态 


DSL 应 该 有 能 力 精 确 报 告 异常 状态 , 且 按 照 3.4.1 节 所 说 的 “领域 驱动 的 异常 报告 ”方式 进行 。 
比 报告 异 稼 更 重要 的 是 处 理 异 遂 。DSL 运 行 期 间 可 能 抛 出 的 所 有 领域 异常 ， 都 应 该 有 相应 的 处 理 
程序 ， 包 括 实 施 各 种 清理 动作 、 释 放 资 源 和 回 滚 事务 。 

怎样 处 理 和 报告 异常 才 算 合适 ,这 也 要 看 你 选择 什么 样 的 策略 来 集成 DSL 脚 本 。 像 3.2.1 节 中 
那 种 依 菲 ScriptEngine 的 集成 策略 ,一 般 在 报告 异常 方面 表现 不 好 。 下 面 的 例子 来 自我 们 之 前 
讨论 在 Java 访 用 程序 中 内 般 Groovy 脚 本 的 部 分 ， 我 们 看 看 它 是 怎么 报告 异 稼 的 : 


ScriptEngineManager factory = new ScriptEngineManager(); 





























ScriptEngine engine - factory.getEngineByName("groovy"); 
Cry i 
List<?> orders = (List<?>) 


engine.eval(new InputStreamReader( 
new BufferedInputStream( 
new SequenceInputStream( 
new FilelInputStream("ClientOrder.groovy"), 
new FilelnputStream("order.ds1l1"))))); 
) catch (javax.script.ScriptException screx) { Pod 
// 具体 的 处 理 
} 


示例 并 没有 在 Groovy 代 人 码 内 显 式 处 理 异常 ,我们 只 是 假设 脚本 的 调用 者 会 去 处 理 @。 
Javax. script. ScriptException 类 市 有 getFilLeName ()4. getLineNumber() 等 方法 ， 有 助 


于 找到 发 生 弄 帝 的 确切 位 置 。 凡 是 源 目 DSL 内 部 的 弄 和 帝都 必须 齐 慎 处 理 ， 而 且 你 需要 回 用 户 提供 
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充分 的 上 下 文 信息 一 一 这 是 重要 的 处 理 原 则 。 然 而 ， 当 DSL 代 码 运 行 在 ScriptEngine 的 沙 合 里 
面 时 ,人 处理 异常 的 时 候 所 需 的 上 下 文 信息 不 一 定 直 观 。 这 个 缺点 再 次 说 明 , 集成 DSL 应 该 优先 选 
择 语 言 专门 提供 的 方式 ， 只 在 不 得 已 时 选择 Java 脚 本 引擎 方案 。 

DSL 的 设计 条 则 是 领域 内 的 可 读 性 和 表现 力 , 因而 我 们 必须 时 刻 考 愿 到 领域 用 户 。 与 此 同时 ， 
我 们 也 要 留心 DSL 对 应 用 设计 的 性 能 有 何 影 响 。 应 该 如 何 折 中 呢 ? 


3.5 ”管理 性 能 表现 


性 能 是 重要 的 评判 标准 ， 但 不 管 你 怎么 想 , 我 认为 它 并 不 是 最 重要 的 评判 标准 。 性 能 低下 的 
应 用 程序 其 性 能 可 以 通过 模 回 或 纵 回 增加 资源 来 提高 ; 但 是 , 如果 实现 了 一 个 完全 不 关心 沟通 和 
维护 性 的 混乱 系统 ， 你 将 注定 受 困 于 它 。 

话说 回来 ， 设 计 应 用 程序 的 时 候 你 还 是 很 有 必要 考虑 性 能 因素 的 。 实 事 求 是 地 说 ， 民 好 的 
DSL 设 计 不 见得 一 定 拖累 应 用 程序 的 性 能 表现 。 有 些 动 态 语 言 ， 如 Groovy 和 Ruby， 确实 比 Java 慢 
一 点 。 但 应 用 程序 开发 者 和 架构 师 需 要 在 速度 和 其 他 特质 之 间 取 舍 ， 考虑 代码 的 可 维护 性 、 表 现 
力 、 对 未 来 变化 的 适应 性 等 ， 并 在 它们 与 速度 之 间 进 行 权衡 。 

应 用 程序 并 非 每 一 部 分 都 需要 快 如 内 电 ,， 有 些 部 分 的 维护 性 比 速度 更 重要 。 例如 ,应 用 程序 
的 配置 参数 一 般 只 需要 处 理 一 次 , 这 可 能 是 在 应 用 程序 局 动 的 时 候 进行 。 所 以 , 与 将 配置 写 人 代 
码 来 加 速 应 用 程序 启动 相 比 ， 我 们 不 如 将 一 部 分 配置 参数 外 部 化 ， 以 更 易 读 的 形式 呈现 给 用 户 。 
改善 表现 力 的 好 处 远 远 大 于 应 用 程序 速度 损失 可 能 导致 问题 的 坏处 。 

目前 看 力 于 改善 JVM 上 动态 语言 执行 性 能 的 目 发 行动 十 分 活跃 , 因此 我 们 更 应 该 选择 这 些 语 
言 来 设计 DSL。 如 有 果 现 在 就 注重 提高 代码 的 表现 力 , 等 到 Groovy 和 Ruby 的 声言 运行 时 在 JVM 上 的 
性 能 提高 了 ， 我 们 的 代码 也 能 自动 享受 到 性 能 改善 的 益处 。 

大 家 完全 清楚 Groovy 和 Ruby 代 人 码 比 相同 功能 的 Java 代 人 码 要 慢 一 些 , 要 是 没有 好 人 处, 谁 会 用 
它们 来 设计 DSL 呢 ? 这 些 语言 好 维护 、 易 谈 ， 而 且 能 很 好 地 适应 变化 ， 而 当 和 宿主 语言 本 喘 具 备 
充足 的 表达 能 力 时 ，DSEL 的 成 长 历程 将 顺利 得 多 。 我 们 并 非 贬 低 性 能 的 重要 性 ， 只 是 说 这 些 因 
率 和 单纯 的 执行 速度 同等 重要 。 你 设计 的 领域 语言 ， 其 演变 道路 和 生命 线 由 所 有 这 些 因 素 共 同 
决定 。 

像 Scala 那 样 的 静态 类 型 语言 性 能 几乎 等 同 于 纯 Java。3.2.2 节 介绍 的 DSL 包 装 大 集 成 模型 ,其 
性 能 基本 和 纯 Java 应 用 程序 没有 区 别 。 

脚本 引擎 因为 运行 在 沙 盒 环 境 下 ,多少 会 慢 一 些 , 不 过 反正 你 也 不 会 用 脚本 来 执行 强调 性 能 
的 任务 。 脚 本 式 的 DSL 主 要 用 于 处 理 轻 量 级 领域 逻辑 ,使 用 者 也 以 最 终 用 户 和 领域 专家 为 主 。 内 
WGXDSL ( 内 部 DSL ) 主要 实现 成 答 主 语言 的 库 ， 所 以 并 不 会 拖累 性 能 。 外 部 DSL 没 有 依靠 和 束 
缚 ,可 以 目 由 实现 其 语言 机 制 。 在 大 多 数 现实 的 应 用 程序 中 ， 外 部 DSL 不 需要 设计 得 像 完整 的 高 
级 语言 那么 复杂 ， 而 且 有 解析 器 生成 器 (YACC, ANTLR ) 和 ( Scala, HaskelliE zi "P ) 解析 
器 组 合子 等 工具 帮忙 ， 如 果 善 加 利用 ， 并 不 难 构建 出 必要 的 语言 设施 。 

最 后 ， 请 记 住 一 条 性 能 调 优 的 黄金 法 则 : 多 点 基准 测试 ， 慢 点 优化 性 能 。 
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3.6 小结 


本 前 我 们 从 所 有 的 角度 出 发 讨论 了 了 DSL 驱动 的 应 用 程序 开发 , 介绍 了 怎样 选择 恰当 的 宋 略 来 
集成 DSL 和 核心 应 用 程序 。 通 过 其 中 介绍 的 各 种 集成 模式 ， 相 信和 你 已 经 了 解 什 么 时 候选 用 包 效 人 硒 
模式 , 什么 时 候选 用 脚本 引擎 模式 。 在 相当 程度 上 , 你 选择 的 实现 语言 决定 了 最 恰当 的 集成 宋 略 。 
我 们 还 谈 到 直 样 处 理 错误 和 异 弟 ， 如 何以 人 符合 领域 习惯 的 用 语 向 用 户 报 告 错误 和 异常 。 最 后 ,我 
们 讨论 了 了 DSL 代码 的 可 维护 性 和 性 能 表现 之 间 的 取舍 。 


























要 点 与 最 佳 实践 

口 DSL 从 不 单独 存在 。 它 们 必定 与 核心 应 用 程序 集成 在 一 起 。 如 果 你 打算 设计 DSL， 请 从 
第 一 天 起 就 牢记 这 条 黄金 法 则 。 

O 设计 内 部 DSL 的 时 候 ，DSL 的 实现 语言 应 该 选择 与 应 用 程序 的 核心 语言 集成 效果 最 佳 的 
那 一 种 。 

口外 部 DSL 通 常 需要 额外 的 设施 ， 如 解析 器 生成 器 。 在 计划 阶段 你 就 应 该 预 作 打算 ， 确保 
团队 拥有 相应 的 开发 资源 。 

OQ 集成 DSL 与 核心 应 用 程序 时 ， 你 应 该 遵从 经 过 考验 的 最 佳 实践 。 


看 完 这 一 革 ， 本 书 的 入 门 部 分 束 要 结束 了。 后 面 的 革 广 ,我 们 将 深入 介绍 DSL 实 现 的 各 方面 
内 容 。 我 们 将 探讨 多 种 JVM 语 言 ， 用 每 一 种 语言 设计 、 实 现 各 种 DSL 代 码 片 段 ， 并 讲评 每 一 种 方 
陈 的 优 缺 点 。 后 面 有 一 段 精彩 纷呈 的 旅途 在 等 符 着 你 。 准 备 好 ， 保 持 冷 静 ， 我 们 要 出 发 了 。 
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从 表面 来 看 ，DSL 的 语法 和 领域 用 户 的 日 党 生活 中 的 用 语 一 致 。 本 书 第 一 部 分 着 重 强 调 让 
软件 “说 ”领域 语言 的 重要 性 。 而 当 你 做 到 了 第 一 部 分 的 要 求 之 后 ， 还 有 DSL 语法 背后 的 语义 
模型 等 着 你 去 培育 ,按照 抽 银 的 设计 原则 去 塑造 它 , 除非 语义 模型 易于 扩展 、 易 于 适应 、 易 于 组 合 ， 
否则 建立 在 语义 模型 之 上 的 语法 很 难 有 出 色 的 表现 力 。 

第 二 部 分 〈 第 4 草 ~ 第 8 章 ) 讨论 能 塑造 出 优秀 语义 模型 的 所 有 惯用 法 和 最 佳 实践 。 

设计 DSL 的 时 候 ， 你 要 按照 编程 所 需 的 抽象 层次 ， 找 到 最 适合 表达 该 层次 抽象 的 语言 。 这 
一 部 分 将 会 使 用 Groovy, Ruby, Scala 和 Clojure 语言 来 实现 DSL。 这 些 语言 各 有 长 处 和 短处 ， 
也 各 有 其 特色 功能 可 用 于 DSL HE. mE RETF DSL 的 开发 方式 ， 你 就 有 必要 了 解 这 些 
语言 提供 的 惯用 法 ， 还 有 它们 与 主 应 用 架构 结合 的 方式 。 

该 部 分 还 涵盖 了 基于 ANTLR 和 (来自 Eclipse 的 ) Xtext 等 现代 框架 的 外 部 DSL 开发 。 
ANTLR 是 一 种 语法 分 析 器 生成 器 ， 可 以 帮助 DSL 编写 定制 的 语法 分 析 器 。Xtext 是 完整 的 外 部 
DSL 开发 及 管理 环境 。 

该 部 分 的 压轴 主题 是 分 析 帮 组 合子 ， 这 是 一 种 用 于 外 部 DSL 开发 的 优美 的 图 数 式 抽象 。 





内 部 DSL 实 现 模 式 





本 章 内 容 

O 内 和 藤 式 DSL 的 元 编程 模式 

O 内 骸 式 DSL 的 类 型 化 抽象 模式 
O 生成 式 DSEL 的 运行 时 元 编程 模式 
O 生成 式 DSL 的 编译 时 元 编程 模式 














本 书 第 一 部 分 已 经 领 你 步 信 了 DSL 驱 动 的 开发 范式 。 我 们 一 起 见识 了 DSL 的 风采 ， 也 见识 了 
它 在 现实 应 用 中 可 能 出 现 的 问题 。 从 本 章 开 始 ， 我 们 开始 探讨 DSL 实 现 层面 的 内 容 。 
每 一 位 巢 构 师 都 有 个 “工具 箱 "， 里 面 放 着 目 己 用 来 对 琢 优美 软件 制品 的 趁 手工 具 。 经 过 这 


一 草 的 学 习 ， 你 会 拥有 目 己 的 “工具 箱 ” 存 放 一 套用 于 实现 DSL 的 架构 模式 。 图 4-1 简 单列 举 了 
本 章 打 算 涉 及 的 话题 。 


为什么 需要 一 会 
E 
| 生成 式 DSL 的 模式 
d. 类 型 | 
运行 时 元 编程 PX 











图 4-1 本 半路 线 图 


DSL 设 计 者 绝 不 可 忽视 DSL 实 现 中 的 惯用 法 和 最 佳 实践 。 因 此 ， 我们 首先 介绍 一 系列 可 以 用 
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元 对 和 象 协议 (meta-object protocol )， 可 以 用 来 在 DSL 上 实现 一 些 动 态 行 为 。 内 部 DSL 的 实现 语言 
大 多 是 动态 类 型 语言 ， 如 Ruby 和 Groovy， 我 们 会 在 4.2 市 讲解 几 种 利用 它们 的 元 编程 能 力 的 几 种 
模式 。 静 态 类 型 语言 的 抽象 能 力 可 用 于 将 DSL 建 模 成 答 主 语言 的 内 骸 类 型 ，4.3 市 以 Scala 作 为 实 
现 语言 讲解 这 类 模式 。4.4 方 和 4.5 方 讨论 不 同 语言 的 代码 生成 能 力 ， 它 们 可 用 于 实现 简练 的 内 部 
DSL。 这 样 产 生 的 DSL 称 为 生成 式 DSL， 因 为 它们 人 简洁 的 表面 语法 所 代表 的 领域 行为 ,是 在 编译 
时 或 运行 时 通过 生成 得 主语 言 的 代码 来 实现 的 。 学 习 完 本 章 , 你 定 会 感 党 胸有成竹 , 因为 你 的 “ 工 
具 箱 ”里 将 塞 满 各 种 实用 的 问题 域 建 模 技巧 、 模 式 和 最 佳 实践 。 























4.1 充实 DSL “工具 箱 ” 


工匠 大 师 总 是 随时 囊 厦 罕 得 满 满 的 工具 箱 。 箱 里 最 开 妈 的 几 件 工 具 是 他 们 从 师 侍 那 里 继承 来 
的 , 然后 是 其 靠 目 己 在 一 年 一 年 的 历练 中 逐渐 充实 进去 的 。 这 本 书 会 交 给 你 一 些 适 合 放 进 “箱子 ” 
里 的 DSL 工 具 ,， 尤其 旦 实现 内 部 DSL 的 工具 。 

我 们 接着 2.3.1T 讨 论 的 内 部 DSL 一 般 模 陈 往 下 说 。 它 们 都 是 一 些 实现 模式 ， 适 用 于 不 同 的 
DSL 设 计 场 景 。2.3.18 用 了 不 少 代 码 卢 段 来 演示 这 些 模式 在 篆 用 语言 中 的 呈现 形式 。 本 章 将 延 
续 前 面 的 讨论 ， 举 出 金融 中 介 系 统 这 个 问题 域 的 例子 ， 尝试 将 问题 域 的 场景 联系 到 它们 在 解答 
域 的 对 应 实现 。 阅 读 的 时 候 ， 请 留心 收集 可 用 于 充 鱼 你 “工具 箱 ” 的 工具 吧 。 有 时 候 ， 我 会 演 
示 同 一 模式 的 不 同 实 现 手法 ,一 般 不 同 手法 所 用 的 实现 语言 也 不 同 , 重点 说 明 每 种 手法 涉及 的 
权衡 取舍 。 

展开 讨论 之 前 , 我 们 先 看 看 图 4-2。 图 4-2 中 的 模式 还 是 我 们 在 第 2 草 看 到 的 那些 , 但 这 次 标注 
了 每 种 模式 对 应 的 实现 制品 形态 ,也 就 是 本 章 要 讨论 的 内 容 。 其 中 有 一 处 标注 需要 说 明 , 请 看 内 
向 式 DSL 类 别 下 的 一 个 模式 “反射 式 元 编程 ” 方 框 。 在 本 草 的 讨论 中 ， 我 们 会 用 这 种 模式 实 
现 Ruby 和 Groovy 的 隐 式 上 下 文 C implicit context )， 还 有 Ruby 的 动态 装饰 器 〈dynamic decorator )。 
两 种 实现 制品 都 有 利于 DSL 服 务 于 其 用 户 : 无 需 增 加 任何 不 必要 的 复杂 性 ， 用户 就 能 清晰 地 表达 
意图 。 

如 图 4-2 所 示 ， 内 部 DSL 分 为 两 类 。 

O 内 内 式 DSL DSL 寄 里 于 答 主 语言 ， 这 意味 者 所 有 的 DSL 代 人 码 都 是 程序 员 耳 接 写 出 来 的 。 

O 生成 式 DSL 部 分 DSL 代 人 码 (大 多 为 重复 性 的 内 容 ) 由 编译 时 或 运行 时 语言 机 制 生 成 。 

在 现实 的 应 用 中 ,模式 不 会 单独 出 现 。 一般, 多 种 模式 协同 作用 ,构成 配套 方 条 , 合力 解决 
用 例 场景 。 一 种 模式 的 作用 产物 被 男 一 种 模式 所 承接 ， 整 个 系统 环 环 相 扣 ， 就 像 “ 模 式 语言 ”在 
进行 一 场 融 洽 对 话 。 后 面 的 讲解 风格 会 按照 DSL 设 计 者 的 工作 思路 来 安排 。 也 就 是 说 ， 我 不 打算 
像 字典 那样 工整 地 分 别 介绍 每 种 模式 ， 而 是 先 举 出 金融 中 介 系 统领 域 的 DSL 代 码 卢 段 示 例 ， 然 后 
剖析 其 中 的 模式 结构 。 这 样 你 不 但 能 看 到 每 种 模式 在 现实 用 例 中 的 呈现 方式 , 还 能 体会 不 同 模式 
结构 如 何 协 同形 成 更 大 的 整体 。 

我 们 首先 看 看 适用 于 实现 内 骸 式 DSL 的 模式 结构 。 
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灵巧 API 
(连贯 接口 ，Java 话 
言 和 Ruby 语 言 ) 





反射 式 元 编程 
( 隐 式 上 下 文 ，Ruby 
TES 语言 和 Groovy 语 言 ， 
PAR _ 语言 和 G WY 
动态 装饰 器 ，Ruby 语 言 ) 





- KRAER 
(类 型 化 的 抽象 ， 


Scala 语 言 ) 


生成 式 编译 时 元 编程 
(通过 宏 来 进行 代码 
生成 ，Clojure 语 言 ) 


运行 时 元 编程 
(运行 时 代码 生成 ， 
Ruby 语 言 ) 








图 4-2 ”内 部 DSL 实 现 模式 及 其 制品 示例 。 本 章 将 讨论 这 些 制品 ， 并 按 图 中 所 列 语 言 提 
供 相应 的 示例 实现 


4.2 ARRI DSL: 元 编程 模式 


元 编程 就 是 “编写 写 程序 的 程序 ”。 书 本 上 像 这 样 的 元 编程 定义 ,很 容易 使 人 误 以 为 元 编程 
不 过 是 给 代码 生成 换 了 个 花哨 的 名 字 。 从 实践 角度 来 说 ,元 编程 , 是 在 语言 环境 的 编 详 时 或 运行 
时 设施 上 ， 用 设施 所 提供 的 元 对 和 象 来 撰写 程序 。 看 过 2.5 市 的 深入 讨论 ， 相 信 你 能 理解 这 个 定义 ， 
RITRARRE T o 

KERRE PT RRRS LAAF, 它们 都 可 以 用 元 编程 手段 来 建 模 。 对 于 一 部 
分 例子 ,我 会 首先 用 一 种 不 具备 元 编程 能 力 的 语言 来 实现 ; 然后 ， 当 我 们 换 一 种 语言 ， 发 挥 其 元 
编程 能 力 在 更 高 层次 的 抽象 上 编程 时 ， 你 会 看 到 前 后 两 种 实现 简洁 度 的 变化 。 















































代码 提示 后 面 的 内 容 中 含有 大 量 代码 片段 ， 我 会 插入 补充 内 容 说 明 一 些 预备 知识 ,解释 必要 
的 语言 特性 ， 以 便 读 者 理解 实现 中 的 细微 之 处 。 这 些 补充 内 容 只 是 简单 说 明 一 下 稍 
后 代码 清单 中 就 要 用 到 的 语言 特性 ， 谷 了解 特定 语言 的 更 多 相关 信息 ， 请 参阅 本 书 
附录 中 相应 语言 的 速 查 表 。 


42 AHA DSL: 元 编程 模式 73 








本 布 接 下 来 给 出 了 3 种 模式 风格 ， 这 些 风 格 落实 之 后 ， 就 成 为 图 4-2 列 出 的 那些 元 编程 模式 的 
具体 实现 。 我 们 将 从 一 个 用 例 场 景 开 始 ， 从 用 户 的 角度 去 观察 其 中 的 DSL， 并 且 解 析 DSL 来 了 解 
其 实现 结构 。 一 个 用 例 不 见得 只 应 用 了 一 种 模式 ,实际 上 以 下 每 种 模式 风格 之 下 ,都 为 了 履行 解 
答 域 的 职责 ,准备 了 好 儿 种 具体 的 模式 实现 。 




















4.2.1 隐 式 上 下 文 和 灵巧 API 


我 们 先 对 前 面 的 章节 来 个 简短 回顾 。 客 户 在 证 券 交 易 商 那里 开户 , 证 券 交 易 商 代 客 户 交 易 他 
们 持 有 的 股票 并 保证 安全 。 关于 客户 账户 的 更 多 信息 , 请 翻阅 3.2.2 方 的 补充 内 容 “ 金 融 中 介 系 统 
客户 账户 ”。 

下 面 我 们 准备 设计 一 段 交 易 商 开设 客户 账户 的 DSL。 你 可 以 自行 评判 元 编程 技巧 对 API 表 现 
力 的 改善 效果 ， 即 使 这 些 元 编程 技巧 作用 于 用 户 看 不 到 的 内 部 实现 。 

1. 评判 DSL 的 表现 力 

来 看 下 面 这 段 DSL 肢 本 。 它 的 功能 是 创建 新 的 客户 账户 ,然后 问 证 券 中 介 企 业 注 册 该 账户 。 


























1 Ruby IliH za 

口 Ruby 怎 样 定 义 类 和 对 象 。Ruby 是 一 种 面向 对 象 《OO ) 语言 ， 义 类 的 方式 和 其 他 
OO 语言 差不多 。 不 过 ，Ruby 有 其 独特 的 对 象 模式 ， epu 时 通过 元 编程 手段 
修改 、 检 查 、 扩 展 对 象 。 

口 Ruby 用 “ 块 ” (block ) 来 实现 闭 包 。 闭 包 指 的 是 一 个 函数 和 它 的 执行 环境 。Ruby 通 六 
它 的 “ 块 ” 语 法 实现 闭 包 

O Ruby 元 编程 基础 知识 。Ruby 的 对 象 模型 包含 许多 可 以 用 于 反射 式 和 生成 式 元 编程 的 元 
件 材 料 ， 例 如 类 、 对 象 、 实 例 、 方 法 、 类 方法 、 单 例 (singleton) 方法 等 。Ruby 元 编程 
机 制 允 许 你 在 运行 时 探查 其 对 象 模 型 ， 也 允许 动态 地 改变 对 象 行为 或 生成 代码 。 


& 


代码 清单 4-1 创建 客户 账户 的 DSL 


Account.create do 6 
number "CL-BXT-23765" 创建 账户 
holders "John Doe", "Phil McCay" 
address "San Francisco" 
type "client" 
email "clientGexample.com" 
end.save.and then do |a| 
| | Ò secure 


Registry.register(a) 

Mailer.new 
.to(a.email address) 
.CCc(a.email address) 
. Subject ("创建 新 账户 ") 
.Body ("客户 账户 #{a.no} 已 创建 ") 开户 后 发 送 邮件 
.Send 

end 
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上 上面 的 代码 展示 了 用 户 使 用 DSL 的 情况 。 留 意 观 察 它 是 怎样 隐藏 实现 细节 ， 同 时 又 将 账户 创 

过 程 回 DSL 使 用 者 表达 清楚 的 。 这 段 代 码 创建 账户 之 余 还 做 了 其 他 一 些 事情 。 你 能 够 在 不 知道 
内 部 实现 的 前 提 下 ， 仅 从 代码 清单 4-1 看 出 是 哪些 事情 吗 ? 如 果 你 全 都 能 看 出 来 ， 那 么 这 就 是 一 
段 漂 亮 的 DSL 实 现 。 

你 很 容易 识别 这 段 DSL 代 码 的 全 部 举动 。 它 首先 创建 账户 @ 并 保存 ( 可 能 是 保存 到 数据 库 ) 
全 ， 人 然后 是 登记 账户 并 发 送 邮 件 给 账户 所 有 人 全 等 动作 。 

从 表现 力 上 看 ， 这 段 DSL 给 用 户 提供 了 一 套 符合 下 观感 党 的 API， 歼 末 很 好 。 领 域 专 家 拿 到 
这 段 DSL 脚 本 肯定 也 能 看 出 里 面 的 动作 序列 ， 因 为 脚本 中 很 好 地 运用 了 领域 语汇 。 接 下 来 ,我们 
开始 深入 了 解 内 部 实现 。 

2. 定义 隐 式 上 下 文 

Account 抽 和 象 内 实现 了 创建 实例 时 需要 调用 的 众多 方法 。 代 码 清单 4-2 中 完全 是 一 般 Ruby 语 

言 定义 类 实例 方法 的 常规 写法 。 


代码 清单 4-2 ”Account 抽 象 在 其 实现 中 运用 了 领域 语汇 


class Account 
































attr reader :no, :names, :addr, :type, :email address 


def number(number) 
ano = number 
end 


def holders(*names) 
anames = names 
end 


def address (addr) 
Qaddr = addr 
end 


def type(t) 
Gtype = t 
end 


def email(e) 
Qemail address = e 
end 


def to s() 
"No: " + @no.to_s + 
" / Names: (" + @names.join(',').to_s + 
") / Address: " + @addr.to_s 
end 
end 


这 些 显而易见 的 方法 定义 不 是 我 们 关心 的 内 容 , 我 们 要 关注 这 些 第 规 语句 表现 出 来 的 微妙 方 
发 现 前 面 所 说 的 那些 实现 模式 。 

拿 到 一 段 代 码 , 你 首先 要 确定 它 的 执行 上 下 文 。 这 个 上 下 文 可 以 是 刚才 定义 的 一 个 对 象 , 也 
可 以 是 你 特地 配置 或 者 隐 式 声明 的 一 个 执行 环境 。 有 的 语言 要求 对 于 每 一 处 方法 调用 都 明确 将 方 





面 


3 
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法 和 对 应 的 上 下 文联 系 在 一 起 。 请 看 下 面 的 Java 代 码 : 


Account acc = new Account (number); 
acc.addHolder(hNamel); 
acc.addHolder(hName2); 
acc.addAddress (addr); 

p 


所 有 针对 Account 对 象 的 方法 调用 都 必须 在 前 面市 上 它 的 调用 者 , 以 此 显 式 地 传递 上 下 文 对 
象 。 显 式 表 达 上 下 文 会 产生 繁 元 的 代码 ， 不 利于 我 们 创作 简洁 易 读 的 DSL。 如 果 一 种 语言 允许 隐 
式 声明 上 下 文 , 肯定 不 是 坏事 。 隐 式 上 下 文 有 利于 语法 人 简明, API 紧 次。 代码 清单 4-1 中 的 number、 
holders、type、email 等 方法 调用 都 发 生 于 一 个 隐 式 上 下 文中 ， 也 就 是 正在 创建 的 Account 
实例 之 内 。 

那么 怎样 建立 隐 式 上 下 文 呢 ? 请 看 下 面 从 Account 类 中 截取 的 相关 Ruby 代 码 片 段 , 它 使 用 一 
点 巧妙 的 元 编程 手法 达到 了 目的 : 


class Account 





attr reader :no, :names, :addr, :type, :email address 
省 略 部 分 同 代 而 清单 4-1 

## 省 略 部 分 同 代码 清单 9 create 接 收 一 个 块 
def self.create(&block) 

account - Account.new 

account.instance eval(&block) 

account 6 在 Account 的 上 下 文 
end 内 执行 传 入 的 块 

end 





请 看 位 置 @，instance_eval 是 一 种 Ruby 元 编程 语法 结构 ， 它 会 在 其 调用 者 的 上 下 文 内 执 
行 传递 给 它 的 Ruby 块 , 因为 我 们 是 在 Account 对 象 上 调用 的 , 所 以 块 就 在 Account 对 和 象 的 上 下 文 
内 执行 。 结果 对 于 那些 通过 块 进行 传递 的 方法 来 说 , 就 好 像 每 次 调用 的 时 候 都 隐 式 地 接受 了 刚 
刚 构造 完毕 的 account 对 象 。 这 是 一 个 反射 式 元 编程 的 例子 。Ruby 执 行 环 境 在 运行 时 通过 反射 确 
定 执行 的 上 下 文 。 

相同 的 手法 也 适用 于 Groovy，Groovy 语 言 同样 具备 很 强 的 元 编程 能 力 。 

我 们 用 Groovy 语 言 改写 上 述 Ruby 代 人 码 ， 结 果 见 代码 清单 4-3。 








e 
E  GroovysüiR 
O 如 何在 Groovy 中 创建 闭 包 并 为 方法 分 发 准备 上 下 文 。 


代码 清单 4-3 ”为 方法 分 发 准备 隐 式 上 下 文 的 Groovy 代 人 码 
class Account { 
// 方法 定义 


static create(closure) { 
def account = new Account() 
account.with closure 
account 
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Account.create { 


number 'CL-BXT-237065' 

holders 'John Doe', 'Phil McCay ' 
address 'San Francisco' 

type 'client' 

email 'client@example.com' 


j 

前 后 两 种 实现 不 太一 样 ， 但 得 到 的 API 表 现 力 差不多 。 

3. 利用 灵巧 API 改 善 表现 力 

易 恋 是 改善 DSL 表 现 力 的 必然 结 采 。 连 贯 接口 是 提高 可 读 性 、 实 现 灵 巧 API 的 途径 之 一 。 通 
过 方法 串联 ,一 个 方法 的 输出 很 目 然 地 成 为 男 一 个 方法 的 输入 。 这 种 手法 使 连 串 的 API 调 用 表达 
起 来 更 自然 , 也 比较 接近 问题 域内 真实 的 动作 序列 。 同 时 , 因为 调用 的 时 候 摆 脱 了 一 些 死板 代码 ， 
API 显 得 “灵巧 ”。 

如 果 回 顾 代码 清单 4-1 中 发 送 邮件 之 前 的 连 串 方法 调用 全 , 你 会 看 到 那里 的 API 调 用 跟 你 平常 
使 用 邮件 客户 端 软件 的 动作 序列 是 一 样 的 。 

你 在 设计 DSL 的 时 候 应 该 注意 语句 是 否 流 畅 。 代 码 清单 4-4 中 的 代码 片段 实现 了 代码 清单 4-1 
中 使 用 的 Mailer 类 ，。 


代码 清单 4-4 ”实现 了 连贯 接口 的 Mailer 类 


class Mailer 














attr reader :mail to, :mail cc, :mail_ subject, :mail body 


def to(*to recipients) 
Qmail to = to recipients 
self 
end 6 返回 自身 以 利 串联 


def cc(*cc recipients) 
Qmail cc = cc recipients 
self 

end 


def subject (subj) 


@mail_subject = subj 
self 
end 
def body (b) 
Qmail body = b 
self 
end 
def send 
# 实际 的 发 送 操作 
puts "发 送 邮 件 到 (#{@mail_ to.join(","))J)" 
end 


end 
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Mailer 实 例 被 返回 给 调用 者 充当 下 一 个 调用 的 上 下 文 。 send 方 法 是 方法 链条 的 最 后 一 环 ， 
它 结束 整个 动作 序列 ， 把 邮件 最 终 发 送出 去 。 

代码 清单 4-1 回 我 们 展示 了 创建 账户 的 DSL， 开 户 的 3 个 步骤 在 代码 中 已 经 比较 明显 。 不 过 ， 
图 4-3 把 步 又 呈现 得 更 清楚， 它们 运用 各 种 配 式 塑造 JDSL 的 最 终 形 态 。 





账户 各 参数 以 块 
-ee 的 形式 传递 进来 
0 
instance eval 
account 准备 好 隐 式 上 下 文 















Mailer 





通过 连贯 接口 填充 所 需 信息 


图 4-3 ”模式 的 应 用 步骤 ， @@ 在 通过 instance_eval 设 立 的 隐 式 上 下 文 里 创建 账户 。 
保存 账户 。 全 通过 连贯 接口 配置 好 mailer， 账 户 通 过 一 个 块 来 传递 


模式 的 应 用 分 为 如 下 3 个 步骤 ; 创建 一 个 账户 实例 ,将 之 保存 到 数据 库 ， 执行 其 余 后 续 操 作 。 
在 这 里 ， 第 三 步 被 设置 成 一 个 闭 包 (或 Ruby 块 )。 之 前 创建 的 account 实 例 被 作为 输入 传递 给 这 
个 财 包 ,用 于 执行 其 他 的 操作 。account 实 例 在 操作 完成 后 仍然 保持 不 变 ; 注意 ,第 三 步 操 作 属 
于 有 “副作用 ”( side-effecting ) 的 操作 。 

管理 程序 的 副作用 是 一 个 微妙 的 程序 设计 问题 。 我 们 需要 将 副作用 隅 离 以 保持 抽象 的 纯粹 
性 。 无 副作用 的 抽象 可 以 为 你 减少 许多 烦恼 。 设 计 DSL 的 时 候 ， 你 应 该 尽量 明确 地 隔离 有 副作用 
的 操作 。 代 码 清 单 4-1 就 把 所 有 涉及 副作用 的 代码 解 类 出 来 ， 放 到 了 一 个 闭 包 中 。 隔 离 副 作用 的 
设计 思路 不 仪 适用 于 内 部 DSL 设 计 ， 你 设计 任何 抽象 都 应 该 牢记 这 个 原则 。 

本 布 我 们 讨论 了 基于 DSL 的 设计 范式 下 两 种 被 普遍 使 用 的 实现 模式 。 本 闻 的 要 点 见 下 面 的 补 
充 内 容 。 











本 市 要 点 
通过 方法 串联 手法 实现 带 连贯 接口 的 灵巧 API (参见 代码 清单 4-4 中 的 Mailer 类 ). 
隐 式 上 下 文 可 降低 DSEL 的 烦琐 程度 ， 形 成 比较 紧凑 的 API， 帮 助 提高 表现 力 (参见 Ruby 
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代码 片段 中 的 create 类 方法 ,或 者 代码 清单 4-3 中 Groovy 代 码 片 段 里 的 create 静 态 方 法 )。 
把 副作用 跟 纯 粹 的 抽象 隔离 开 ( 参见 代码 清单 4-1 中 用 于 开户 和 发 送 通 知 邮件 的 Ruby 块 )。 








接 下 来 ， 我 们 继续 介绍 别 的 实现 结构 ， 它 们 通过 反射 式 元 编程 在 DSL 中 实现 动态 行为 。 
4.2.2 ”利用 动态 北 饰 器 的 反射 式 元 编程 


在 4.2.1 广 ,我们 了 解 到 元 编程 技巧 可 以 用 来 改善 DSL 的 表现 力 和 条 洁 度 。 本 节 将 介绍 运行 时 
的 为 一 种 元 编程 手法 : 通过 动态 操控 类 对 象 ， 对 其 他 对 和 象 进行 装饰 。 

"lias ( Decorator ) 模式 用 于 在 运行 时 动态 地 增加 对 象 的 功能 。( 装饰 妖 模 式 用 在 抽象 之 间 ， 
可 以 增加 它们 的 组 合 能 力 ， 附 录 A 对 此 有 所 讨论 。) 本 证 我 们 偏重 于 实现 的 角度 ， 看 看 怎样 发 挥 
元 编程 的 威力 ， 做 出 更 动态 的 疙 饰 妖 。 

1. Java 中 的 装饰 器 

我 们 还 是 从 Trade 抽 象 入手， 这 个 领域 实体 是 对 交易 过 程 中 一 些 最 基本 相关 要 素 的 建 模 。 作 
为 例子 , 我 们 打算 在 Trade 对 象 的 基础 上 设计 一 些 影 响 其 交易 净值 的 配套 猴 饰 希 。 关 于 如 何 计算 
交易 的 现金 价值 ， 请 看 补充 内 容 “金融 中 介 系 统 : 交易 的 现金 价值 ”。 

















le 金融 中 介 系统 ， 交 易 的 现金 价值 

每 一 笔 交 易 都 有 其 现金 价值 , 也 就 是 接受 证 券 的 交易 方 需要 向 交 出 证 券 的 交易 方 支付 的 
金额 ,这 个 最 终 的 支付 金额 称 为 NSV ( Net Settlement Value, 净 结 算 价 值 )。 NSV 主 要 由 两 部 
分 构成 : 证 券 总 值 和 税 费 。 

证 券 总 值 取 决 于 所 交易 证 券 的 单价 、 种 类 ， 还 有 一 些 附 加 成 分 ， 如 债券 的 萤 息 价格 。 税 
费 额 需要 计 入 各 种 税 、 手 续费 、 交 多 征 费 、 佣 金 以 及 交易 过 程 中 产生 的 利息 等 。 

证 券 总 值 的 计算 与 证 券 的 类 型 有 关 (比如 有 股权 和 固定 收益 之 分 ), 但 大 体 上 是 所 交易 证 
券 的 单价 和 数量 的 一 个 函数 。 

另外 的 税 费 部 分 , 根据 交易 发 生 的 所 在 国 、 所 在 交 荔 所 、 交 易 的 证 券 ， 各 有 不 同 规定 。 例 
如 ， 在 中 国 香港 ， 印花税 被 定 为 0.125%， 买 入 和 卖 出 股权 证 券 要 交 0.007% 的 交易 征 费 。 


请 看 代码 清单 4-5 中 的 Java 代 码 。 
代码 清单 4-5 ” ”Trade 抽象 和 它 的 Java 痰 饰 各 
public class Trade | <O Trade 抽 象 


public float value() { 


T a ' 计算 并 返回 交易 价值 
) 
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public class TaxFeeDecorator extends Trade { 
private Trade trade; 


public TaxFeeDecorator(Trade trade) ( 装饰 器 
this.trade = trade; 

} 

@Override 

public float value() { 


return trade.value() + //..; 
} 
j pi 税 费 计算 的 具体 细节 


public class CommissionDecorator extends Trade { 
private Trade trade; 


public CommissionDecorator(Trade trade) { 
this.trade - trade; 

j 

QGOverride 

public float value() ( 
return trade.value() + //..; 


| 6 佣金 计算 的 具体 细节 


代码 清单 4-$ 除 了 实现 rraaqe 抽 和 象 的 契约 @, 还 有 两 个 配套 的 装饰 顺和 全 ,装饰 器 与 Trade 搭配 
使 用 可 影响 交易 的 成 交 净 值 @@@@.， 这 些 装饰 器 的 用 法 如 下 : 
rade = 
i m CommissionDecorator( 


new TaxFeeDecorator(new Trade())); 
System.out.println(t.value()): 


你 完全 可 以 在 不 触动 基本 的 Trade 抽 象 前 提 下 ,在 其 上 继续 增加 其 他 装饰 絮 。 最 后 计算 出 来 
的 交易 净值 等 于 施加 于 mrade 对 象 的 所 有 装饰 需 的 合并 作用 结果 。 

代码 清单 4-$ 就 是 用 Java 实 现 的 , 是 针对 计算 给 定 交 易 的 交易 净值 这 一 任务 而 设计 的 DSL。 显 
然 这 已 经 是 以 Java 作 为 实现 语言 所 能 得 到 的 最 好 结果 了 。 站 在 程序 员 的 角度 , 这 段 DSL 很 好 理解 ， 
而 且 熟 悉 GoF 设 计 模 式 (4.7 节 文献 [1] ) 的 程序 员 会 很 满意 地 看 到 抽象 的 模式 原理 被 落实 到 一 个 
具体 的 领域 实现 。 不 过 ， 我 们 还 能 做 得 更 好 一 些 吗 ? 

2. 改进 Java 实 现 

我 们 可 以 凭借 Ruby 或 Groovy 的 反射 式 元 编程 能 力 提 高 DSL 的 表现 力 和 动态 性 。 不 过 , 在 查看 
具体 的 实现 之 前 ， 我 们 先 来 确定 一 下 哪些 地 方 有 改进 的 潜力 。 请 看 表 4-1。 























表 4-1 先前 用 Java 和 涂饰 器 模式 实现 的 DSLFJ 能 具有 的 改进 点 





能 否 改 进 如 何 改 进 
表现 力 和 领域 友好 度 可 以 更 简 清 一 些 。 毕 竟 对 这 方面 的 追求 是 无 止境 的 
Trade 抽象 和 装饰 希 被 便 性 拥 绑 在 一 起 去 除 静 态 继 承 关 系 ， 这 可 提高 装饰 大 的 重用 性 





易 读 性 。Java 实 现 阅读 顺序 由 外 而 内 , 要 穿 过 一 长 串 装 饰 ”把 Trade 放 在 前 面 ， 装 饰 融 放 到 后 面 
人 希 才 能 看 到 核心 的 Trade 抽象 ， 不 符合 一 般 直 觉 
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Ruby、Groovy 等 动态 类 型 语言 比 Java 的 语法 简练 不 少 。Ruby 和 Groovy 都 具备 鸭子 类 型 ( duck 
typing ) 特性 ， 通 过 牺牲 对 于 Java、Scala 等 语言 开 箱 即 用 的 静态 类 型 安全 ， 可 以 换取 更 有 利于 重 
用 的 抽象 。( 其 实 Scala 也 可 以 实现 鸭子 类 型 , 详 见 第 6 音 。) 表 4-1 所 列 的 改进 点 要 求 你 对 Ruby 的 动 
态 性 有 更 深入 的 了 解 ， 所 以 我 们 接 下 来 介绍 这 方面 的 一 些 知 识 。 

3. Ruby 中 的 动态 装饰 器 

代码 清单 4-6 中 的 Ruby 代 码 是 和 先前 的 Java 实 现 差 不 多 的 Trade 抽 象 ,其 中 充实 了 一 些 较 为 贴 


近 现 实 的 内 容 。 





e 
E ”Ruby 知 识 点 
口 Ruby 的 模块 ( module ) 特性 有 利于 实现 mixin，mixin 可 以 附加 在 其 他 类 或 模块 上 。 


O 通过 反射 来 生成 运行 时 代码 的 相关 Ruby 元 编程 基础 知识 。 


代码 清单 4-6 Trade 抽象 的 Ruby 实 现 


class Trade 
attr accessor :ref no, :account, :instrument, :principal 


def initialize(ref, acc, ins, prin) 
rer no = ref 
Gaccount = acc 
Qinstrument = ins 
Qprincipal = prin 


a 9 动态 模块 扩展 


def with(*args) 
args.inject(self) ( |memo, val| memo.extend val ) 


end 
def value 
@principal 
end 
end 


与 之 前 的 Java 实 现 相 比 ， 只 有 with 方法 各 这 一 部 分 比较 值得 讨论 ， 其 他 部 分 差异 不 大 。 我 们 
等 下 再 回头 讨论 with 方法 ， 现 在 先 看 看 装饰 器 的 部 分 。 我 把 装饰 器 设计 成 Ruby 模 块 的 形式 ， 使 
用 的 时 候 可 以 将 其 作为 mixin 混 入 到 实现 主体 之 中 ( 关于 mixin， 请 参阅 A.3 市 ): 


module TaxFee 
def value 
super + principal * 0.2 





end 
end 


module Commission 
def value 
super - principal * 0.1 
end 
end 
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显而易见 ， 这 段 代码 中 的 装饰 融 并 没有 静态 地 耦合 到 作为 抽象 主干 的 rraae 类 。 我 们 轻 而 易 
举 地 就 达成 了 表 4-1 中 的 一 项 改进 目标 。 

我 们 刚刚 不 是 提 过 鸭子 类 型 吗 ? 上 术 代 码 片段 中 的 这 些 模块 可 以 混和 到 任意 实现 了 value 
方法 的 Ruby 类 中 ; 正好 我 们 的 Trade 类 就 有 这 么 一 个 value 方 法 。 那 么 上 面 模块 定义 中 的 super 
调用 是 怎么 发 挥 作 用 的 呢 ? 在 Ruby 语 言 里 , 如 果 你 指定 了 一 个 不 带 任 何 参 数 的 super 调 用 , Ruby 
会 发 送 一 条 消息 给 当前 对 象 的 父 对 象 , 请求 调 用 父 对 象 的 同名 方法 。 这 就 是 反射 式 元 编程 大 显 屿 
手 的 时 刻 了 。 此 处 调用 的 是 value 方 法 。 我 们 调用 supezr 类 方法 的 时 候 并 不 需要 静态 地 绑 定 任何 
具体 的 父 类 。 图 4-4 展 示 了 指向 Trade 类 和 各 装饰 需 的 super 调 用 如 何在 运行 时 动态 串联 到 一 起 ， 
以 达到 我 们 所 期 望 的 效果 。 


tr = Trade.new('r-123', 'a-123', 'i-123', 200).with TaxFee, Commission 
tr.value 




















Commission.value = super - principal * 0.1 
A 
= 240- 200 * 0.1 = 220 


TaxFee.value = super + principal * 0.2 
A 


= 200 + 200 * 0.2 = 240 


Trade.value = principal 
A 
200 
图 4-4 ”展示 super 调 用 如 何 将 value () 方 法 串 接 在 一 起 。 调 用 从 commission.value() 
开始 ，commission 是 链条 中 的 最 后 一 个 模块 ， 调 用 和 同 下 逐 级 传播 ， 直 到 Trade 


类 。 实 线 箭 头 连 接 起 来 就 是 调用 的 链条 ; 求 值 计算 沿 着 虚线 箭头 依次 进行 ， 最 终 
求 得 结果 220 


在 这 个 例子 里 , 元 编程 的 神奇 作用 体现 在 什么 地 方 ? 它 怎 样 改善 DSL 的 表现 力 ? 硅 回 答 这 两 
个 问题 ， 我 们 要 回头 说 说 代码 清单 4-6 中 的 with 方法 。 这 个 方法 的 作用 是 把 作为 参数 传递 给 它 的 
所 有 装饰 句 动 态 地 连接 到 Trade 对 象 , 使 Trade 对 象 扩展 成 为 新 的 抽象 。 图 4-5 说 明了 装饰 器 与 主 
体 类 动态 组 合 的 原理 。 

我 们 完全 可 以 通过 对 Ruby 类 的 静态 扩展 取得 与 图 中 动态 扩展 相同 的 效 来 ,但 是 在 运行 时 进行 
扩展 更 有 利于 各 部 分 抽象 提 高 可 重用 性 ， 降 低 硝 合 程度 。 代 码 清单 4-6 所 实现 的 Trade 对 象 与 闭 
饰 融 结合 的 例子 如 下 : 


tr = Trade.new('r-123', 'a-123', 'i-123', 20000) .with TaxFee, Commission 
puts tr.value 


RI NZH EREITEN AR, STRA] E BA ECPRUDSL. EREE B 
内 而 外 ， 符 合 目 然 的 领域 语法 。 语 法 中 的 非 本 质 复 杂 性 低 于 先前 的 Java 版 本 ,对 于 领域 用 户 而 言 
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表现 力 明 显 提高 。( 关 于 非 本 质 复 杂 性 的 讨论 ,请 参阅 A.3.2 节 。) 至 此 ,， 表 4-1 所 列 的 3 项 改进 全 部 
成 功 完成 。 这 一 路 简直 太 顺 利 了 。 


主体 抽象 (Trade) 装饰 器 (TaxFee, Commision) 

















with () 方 法 在 运行 时 动态 地 
用 各 种 装饰 左 扩 展 主 体 抽象 


此 对 象 负责 啊 应 主体 抽象 
VAS BUR Tee Vti HJ A DH 


EE E (FAH) 


图 4-5 ”主体 抽象 ( Trade 类 ) 通过 with () 方 法 动态 地 与 各 种 装饰 器 (TaxFee 和 
Commission) 连接 起 来 ， 形 成 扩展 


装饰 器 设计 模式 用 于 在 对 象 上 附加 额外 的 职责 。 如 果 能 像 本 节 用 Ruby 模 块 做 到 的 那样 把 
装饰 器 动态 化 ， 你 将 可 以 大 大 提高 DSL 的 易 读 性 。 


不 过 ,我 们 所 面 对 的 并 非 坦 途 。 任 何 依赖 于 动态 元 编程 的 模式 部 有 你 必须 小 心 应 对 的 陷阱 。 
请 特别 注意 那些 可 能 给 日 后 造成 肪 烦 的 问题 ， 参 见 下 面 的 小 小 提醒 。 


在 动态 类 型 语言 中 使 用 运行 时 元 编程 将 带 给 你 更 简洁 的 语法 、 更 具 表 现 力 的 领域 

语言 ， 还 有 动态 操控 类 结构 的 能 力 。 而 换取 这 些 好 处 的 代价 是 类 型 安全 和 运行 速 
度 两 方面 的 牺牲 。 强 调 代 价 并 不 意味 着 劝阻 你 运用 元 编程 技术 设计 DSL， 只 是 提醒 你 不 
要 忘记 设计 抽象 的 过 程 始终 是 一 个 权衡 利 产 的 过 程 。 在 基于 DSL 的 开发 活动 中 ， 难免 有 
时 静态 类 型 安全 的 重要 性 高 于 为 DSL 用 户 提 供 最 佳 表达 手段 的 需要 。 本草 后 面 还 会 讨论 
到 ,即使 在 满足 静态 类 型 检查 的 前 提 下 , 像 Scala 这 样 的 语言 仍然 有 办 法 让 DSL 的 表现 力 
不 输 于 Ruby 语 言 。 所 以 千 万 别 匆 忙 地 下 决定 ， 先 比较 一 下 所 有 可 能 的 方案 吧 。 


本 介绍 了 如 何 利用 元 编程 来 实现 动态 的 装饰 闹 。 其 实现 方式 与 Java、C# 等 静态 类 型 语言 
差别 很 大 ， 表 现 出 了 更 高 的 灵活 性 。 最 重要 的 是 ， 我 们 见识 了 动态 冯 饰 可 用 于 实现 DSL 代 码 的 
真实 案例 。 接 下 来 , 我们 继续 探索 反 冉 式 元 编程 搁 术 ,把 为 一 种 第 见 的 Java 设 计 模 式 活用 于 DSL 


设计 。 
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4.2.3 利用 buider 的 反射 式 元 编程 


在 第 2 章 作 为 入 门 练习 , 我 们 实现 过 一 个 订单 处 理 DSL, 还 记得 吗 ? 当时 在 Java 版 本 的 实现 里 
面 ， 我 们 为 了 提高 DSL 对 于 用 户 的 表现 力 运 用 了 Builder 设 计 模 式 (4.7 节 文献 [1] )。 下 面 是 从 2.1.2 
节 有 照搬 过 来 的 一 段 代 码 ， 订 单 处 理 DSL 的 Java 实 现 使 用 起 来 是 这 样子 的 : 


Order o = 














new Order.Builder() 
.buy (100, "IBM") 
.atLimitPrice(300) 
.allOrNone() 
.valueAs(new OrderValuerImpl()) 
.build(); 


REH TEROA PEREA orderi R. HlIkH FJavahj iik, 
整个 构建 过 程 是 静态 的 ; builder 提 供 的 所 有 构建 方法 全 部 只 能 静态 地 调用 。 如 果 借 助 Groovy 语 言 
的 动态 元 编程 模式 ， 我 们 有 办 法 提高 builder 的 “ 极 简 ” 程 度 ， 同 时 又 不 削弱 其 表现 力 (4.7 市 文献 
[2]; 关于 抽象 设计 中 的 极 简 特 质 ， 请 参阅 A.2 节 )。 这 样 用 户 不 用 写 那么 多 八股 代码 ， 得 出 来 的 
DSL 比 较 精 干 而 且 更 多 于 掌握 。 在 静态 方式 下 需要 扒 砌 大 量 死板 代码 来 完成 的 事情 ,语言 运行 时 
利用 反射 束 做 到 了 (所 以 叫 反 射 式 元 编程 )。 
































e 
E ” Groovy 知识 点 
O Groovy 中 如 何 定 义 类 和 对 象 。 
O Groovy buildqer 允 许 你 使 用 反射 建立 对 象 的 层次 结构 ， 其 语法 简练 ， 特 别 适 合 运 用 
于 DSL。 


1. Groovy builder 的 魔力 

代码 清单 4-7 对 运用 Groovy 对 Trade 对 象 进行 了 建 模 ， 从 中 可 以 看 出 它 的 基本 组 成 要 素 。 这 
里 需要 再 次 说 明 , 我 们 举例 所 用 的 Trade 抽象 因应 本 章 的 议题 作 了 大 幅度 的 简化 ,不 可 以 和 真实 
交易 系统 中 的 情况 相提并论 。 


代码 清单 4-7” Groovy 实现 的 Trade 抽 和 象 


package domain.trade 














class Trade ( 
String refNo 
Account account 
Instrument instrument 
List«Taxfee» taxfees - [] 


Í 


class Account { 
String no 
String name 
String type 

j 
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class Instrument { 
String isin 
String type 
String name 


} 


class Taxfee { 
String taxId 
BigDecimal value 


} 

这 是 一 个 平平 无 奇 的 Trade 抽 象 ， 它 由 一 个 Account 对 和 象 、 一 个 Instrument 对 象 和 一 个 
Taxfee 对 象 列表 组 成 。 我 现在 要 介绍 一 段 buildqer 脚 本 ， 它 能 神奇 地 探知 抽象 内 部 的 类 结构 ， 
用 你 提供 的 值 正 确 构造 出 抽象 内 的 各 个 对 象 。 


代码 清单 4-8 作用 于 Trade 对 象 的 动态 builder， 用 Groovy 语 言 编写 


def builder = 
new ObjectGraphBuilder() 








builder.classNameResolver = "domain.trade" 

builder.classLoader = getClass().classLoader ER 
建立 puilder 

def trd = builder.trade( refNo: 'TRD-123') { A 


account (no: 'ACC-123', name: 'Joe Doe', type: 'TRADING') 
instrument(isin: 'INS-123', type: 'EQUITY', name: 'IBM Stock') 
3.times { 
taxfee(taxld: 'Tax $íitj)', value: BigDecimal.valueOf(100)) 
j 
} 


assert trd !- null 动态 地 产生 方法 
assert trd.account.name -- 'Joe Doe' 

assert trd.instrument.isin -- 'INS-123' 

assert trd.taxfees.size -- 3 

















对 于 一 直 使 用 Java 语 言 的 开发 者 来 说 ， 上 面 的 代码 确实 有 点 神奇 。DSL 用 户 在 脚本 中 写 了 
个 trd@ 方 法 ， 它 构造 了 一 个 创建 交易 对 象 的 builder。 在 tro 方 法 里 面 ， 用 户 调用 了 account、 
instrument@ 等 方法 ,可 是 这 些 方法 明明 Trade 类 里 面 从 来 没有 定义 过 ,就 好 像 语言 运行 时 把 它 
们 变 出 来 的 一 样 ， 代 码 居然 能 正确 执行 。 这 其 实 是 Groovy 元 编程 变 的 “小 戏法 ”。 

2. 揭 开 Groovy builder 的 秘密 

除了 元 编程 技术 参与 了 “戏法 ”， 命 名 参数 和 闭 包 也 “出 了 很 大 力气 ”， 才 让 代码 清单 4-8 中 
的 DSL 脚 本 表现 出 那样 奇妙 的 结果 。 前 面 各 章 的 例子 已 经 多 次 展示 过 闭 包 在 Groovy 语 言 中 的 用 
法 。 现 在 我 们 更 深入 一 点 ， 仔 细 看 看 语言 运行 时 是 怎样 探知 类 名 、 正 确 创建 实例 ， 然 后 用 builder 
获得 的 数据 填充 实例 的 属性 的 。 要 点 参见 表 4-2。 


X4-2 _builder 与 元 编程 











运行 时 的 作用 工作 原理 
匹配 方法 名 在 ObjectGraphBuilder 上 调用 任何 方法 , Groovy 都 会 把 方法 名 通过 ClassNameResolver 


策略 进行 匹配 ， 匹 配 到 的 class 对 象 就 是 将 要 实例 化 的 类 
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(2E) 
运行 时 的 作用 工作 原理 
设置 classNameResolver ”用 户 可 以 自 定 义 ClassNameResolver 策 略 ， 代 之 以 自己 的 实现 
创建 实例 Groovy 得 到 class 对 象 之 后 ， 会 应 用 策略 NewInstanceResolver， 调 用 目标 类 的 无 参数 


构造 器 创建 该 类 的 一 个 默认 实例 
处 理 类 结构 和 层次 关系 如 有 果 目 标 类 的 内 部 引用 了 别 的 类 ， 形 成 了 父子 关系 ( 如 代码 清单 48 中 的 Trage 和 


Account ), builder 会 更 复杂 一 些 。 遇 到 这 样 的 情况 , builder 会 应 用 RelationNameResolver、 
childqPropertySetter 等 其 他 策略 去 确定 属性 所 属 的 类 ， 然 后 实例 化 它们 


如 果 想 进一步 了 解 Groovy builder 的 工作 细节 ， 请 参考 4.7 节 文献 [2]。 

你 已 经 看 了 不 少 元 编程 技术 ， 对 于 怎样 用 它们 设计 具有 表现 力 的 DSL 有 了 相当 程度 的 了 解 。 
现在 全 面 观察 一 下 本 节 中 我 们 所 做 过 的 事情 ， 回 顾 图 4-2 中 我 们 目前 为 止 尝 试 过 的 所 有 模式 。 这 
些 模式 就 是 你 今后 冶 荡 DSL 世 界 的 工具 了 。 

















builder 可 以 用 于 在 DSL 里 面 分 步 构造 对 象 。builder 被 动态 化 之 后 , 大幅 减少 了 不 得 不 写 的 
死板 代码 。Groovy 或 Ruby 语 言 中 的 动态 builder 通 过 语言 运行 时 的 元 对 象 协 议 动态 地 构造 方法 ， 
大 大 缓解 了 DSL 实 现 方面 的 负担 。 


4.2.4 经 验 总 结 : 元 编程 模式 


切 不 可 将 我 们 讨论 过 的 众多 模式 视 为 一 个 个 互 不 关联 的 实体 。 面 对 具体 领域 的 时 候 , 你 会 发 
现 每 一 种 模式 在 应 用 之 后 , 虱 可 能 形成 需要 用 为 一 种 模式 去 化 解 的 作用 力 (4.7 市 文献 [5] ) 图 4-6 
简要 回顾 了 本 章 到 目前 为 止 实现 过 的 模式 。 图 4-6 将 图 4-2 列 举 的 DSL 模 式 列 于 左 侧 ， 而 本 章 举 例 
讨论 过 的 具体 实现 方案 则 列 于 右 侧 。 























内 部 DSL 模 式 


v 灵巧 API => 连贯 接口 





v 反射 式 元 编程 ”=> 隐 式 上 下 文 ， 通过 


e instance eval (Ruby) 


e with (Groovy) 


以 mixin 实 现 的 动态 装饰 器 


可 深入 对 象 层 次 结构 的 动态 builder 





图 4-6 ”目前 为 止 介绍 过 的 内 部 DSL 模 式 。 本 章 已 经 在 Ruby 和 Groovy 语 言 中 实现 了 这 些 模 式 
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我 们 讨论 的 几 个 模式 都 相当 重要 ,实现 内 部 DSL 的 时 候 你 会 常常 用 到 。 这 些 模式 主要 针对 具 
备 较 强 元 编程 能 力 的 动态 类 型 语言 。 

介绍 完 反射 式 元 编程 ， 我 们 即将 探讨 另 一 类 模式 ， 这 类 模式 将 用 于 在 像 Scala 那 样 的 静态 
类 型 语言 里 面 实现 内 部 DSL。 当 你 用 类 型 化 的 抽象 来 建 模 DSL 元 素 时 , 语言 类 型 系统 中 的 一 些 
规则 可 以 自然 地 充当 起 领域 中 的 业务 规则 。 这 也 是 一 种 保持 DSL 简 练 同时 又 不 失 其 表现 力 的 


途径 。 




















本 节 讨 论 的 模式 可 帮助 你 降低 DSEL 的 烦琐 度 , 提高 动态 性 ,。 我们 利用 语言 的 元 编程 能 力 在 
运行 时 完成 必要 的 工作 ， 以 此 取代 静态 方式 下 那些 死板 的 代码 。 

重要 的 不 仅 是 具体 的 Ruby 或 Groovy 语 言 实现 ， 你 需要 全 面 理解 塑造 了 这 些 实 现 的 上 下 文 
环境 。 有 些 强大 的 实现 语言 能 给 你 提供 丰富 的 手段 去 创作 动态 的 DSL。 

当 你 用 这 里 学 到 的 技巧 去 解决 实际 的 领域 建 模 问题 , 从 而 对 问题 有 了 更 深刻 的 体会 , 你 将 
会 给 这 些 技 巧 找 到 更 多 的 用 武之 地 ， 也 会 创造 出 自己 的 解决 之 道 。 


4.3 ARR DSL: 类 型 化 抽象 模式 


ESNE, 我 们 对 于 模式 的 探讨 全 都 离 不 开 精 人 稍 DSL 人 代码 结构 这 个 主题 ， 而 且 从 使 用 和 实现 
两 个 方 癌 进行 了 反复 的 讨论 。 

本 市 暂时 把 动态 语言 放 到 一 边 , 我 们 试 试看 能 否 利 用 类 型 系统 的 威力 激发 DSL 的 表现 力 。 本 
方 的 示例 全 部 使 用 Scala 语 言 ( 以 Scala 2.8 为 准 )。 我 们 重点 说 明 类 型 怎样 ( 其 至 在 程序 运行 之 前 ) 
给 DSL 的 一 致 性 增加 一 层 额外 保障 。 此 外 ， 交 型 在 使 DSL 语 言 精 练 方面 的 能 力 不 输 于 我 们 先前 讨 
论 的 一 些 动态 语言 。 多 看 看 岁 4-2， 本 章 讨论 的 所 有 模式 午 在 那个 大 纲 里 面 。 


4.3.1 运用 高 阶 函 数 使 抽象 泛 化 


一 直 以 来 凡是 涉及 领域 的 讨论 ,我 们 总 是 拿 金融 中 介 系 统 里 的 操作 来 举例 , 如 维护 客户 账户 、 
处 理 交 易 和 成 交 、 代 客户 下 单 等 。 本 节 我 们 来 看 一 份 客户 文件 ， 上面 记 录 了 中 介 在 工作 日 内 进行 
的 所 有 交易 活动 。 交 易 组 织 会 为 某 些 客户 生成 这 样 一 份 账户 每 日 交易 活动 报表 , 然后 发 送 到 客户 
的 邮件 地 址 。 

1. 生成 一 份 分 组 报表 

图 4-7 是 一 份 账户 活动 报表 ， 里 面 记 录 了 交易 的 票据 品种 、 数 量 、 时 间 、 人 金额 。 

很 多 组 织 会 为 客户 提供 灵活 的 每 日 交易 情况 查看 方式 。 客户 可 以 要 求 交 易 情 况 按 某 一 项 表格 
元 素 排序 或 者 分 组 。 比如, 我 会 希望 一 天 内 所 有 的 交易 按照 票据 品种 排序 并 且 分 组 显示 , 如 图 4-8 
所 示 。 

我 也 可 以 要 求 把 所 有 的 交易 按照 交易 数量 来 分 组 ， 如 图 4-9 所 示 。 
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账户 名 称 : 
2009 年 12 月 12 日 的 交易 活动 


Google 
IBM 
Google 
Verizon 
IBM 


Google 





图 4-7 ”经 过 从 化 的 账户 活动 明细 报表 





账户 名 称 : 
2009 年 12 月 12 日 的 交易 活动 : 


Google 


IBM 


Verizon 








图 4-8 ”一 份 账户 活动 报表 ， 按 照 票据 品种 进行 了 排序 和 分 组 。 注 意 了 票据 栏 的 排序 方 
式 ， 数 量 栏 将 同一 种 票据 的 记录 排 在 了 一 起 


现实 中 的 账户 活动 报表 还 会 有 其 他 很 多 内 容 , 不 过 图 中 的 信息 已 经 足够 满足 下 面 的 实现 和 讨 
论 需 要 了 。 我 们 现在 要 构建 一 种 DSL 来 实现 自 定 义 的 分 组 男 数 ,让 客户 按 需要 调整 交易 活动 报表 
的 样式 。 一 开始 ， — hei AM dein oii iis 我 们 考 
虑 设计 一 人 1 
精炼 度 。 
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账户 名 称 : 
2009 年 12 月 12 日 的 交易 活动 


Google 
Verizon 


Google 
IBM 


Google 


IBM 














图 4-9 一 份 账户 交易 报表 ， 按 照 当 日 的 交易 数量 进行 了 排序 和 分 组 


定义 ”组 合子 是 以 其 他 函数 作为 输入 的 高 阶 函 数 。 组 合子 可 以 被 组 织 起 来 构成 DSL 的 语言 结构 ， 
本 节 以 及 第 6 章 都 有 这 方面 的 例子 。 附 录 A 也 详细 讨论 了 组 合子 。 


Scala 关 型 系统 可 以 保证 操作 的 静态 类 型 安全 , 又 有 者 处 理 高 阶 咀 数 的 能 力 , 你 阅读 完 本 市 的 


^ 


例子 ， 必 定 会 对 Scala 的 这 些 特 点 次 有 体会 。 那 么 ， 我 们 就 直接 来 看 代码 示例 吧 。 





1 Scala 知 识 点 
O case 类 定义 不 可 变 的 值 对 象 。case 类 是 一 种 简洁 的 抽象 设计 手段 ， 可 以 用 于 自动 获得 编 
译 器 提供 的 许多 额外 便利 。 
口 针对 已 有 的 抽象 ， 隐 式 类 型 转换 提供 了 一 种 完全 非 侵入 的 扩展 方式 。 
D for-comprehension 特 性 针对 集合 上 的 和 迭代 子 提供 了 一 种 函数 式 抽象 。 
口 运用 高 阶 函 数 ， 你 可 以 设计 和 组 织 起 能 力 强悍 的 函数 式 抽象 。 


2. 建立 基本 抽象 

我 们 来 试 一 下 从 后 往 前 推 的 方法 ， 先 设想 一 下 DSL 最 后 的 样子 , 再 尝试 用 Scala 实 现 出 来 。 用 
户 将 会 这 样 使 用 我 们 的 DSL: 

activityReport groupBy( .instrument) 

activityReport groupBy( .quantity) 


第 一 行 DSL 人 代码 生成 一 份 按 票据 品种 分 组 的 活动 报表 , 第 二 行 代码 生成 的 报表 则 按 交 易 数 量 
分 组 。 下 面 的 代码 厂 段 实现 了 账户 活动 报表 的 基本 抽象 ， 我 们 来 仔细 看 看 它 具 备 的 一 些 特性 。 
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type Instrument = String P 
具体 类 型 定义 
case class TradedQuantity(instrument: Instrument, ARE 
quantity: Int) 
P 值 对 象 


implicit def tuple2ToLineItem(t: (Instrument, Int)) = 
TradedQuantity(t,. 1, t..2) 


P Tuple2 到 LineItem 的 隐 


case class ActivityReport(account: String, m 
式 类 型 转换 


quantities: List[TradedQuantity]) { X 
Lus 6 主体 抽象 
} 


本 书 不 是 一 本 Scala 专 阁 , 但 为 了 帮助 读者 理解 本 书 , 我 将 重点 说 明 这 段 代码 展现 出 来 的 一 些 
语言 特性 。 这 样 一 来 ， 你 可 以 把 它 和 等 价 的 Java 代 人 码 相 比 较 ， 从 而 对 它 的 表现 力 水 平 有 一 些 耳 观 
的 认识 。 

实现 DSL 随 时 都 要 注意 对 表现 力 的 要 求 。 代 码 开头 用 一 则 类 型 定义 来 对 领域 制品 建 模 @， 迟 
免 百 接 套 用 意义 含糊 的 原生 数据 类 型 , 让 代码 直接 说 明 目 且 的 含义 。 这 样 不 但 利于 领域 用 户 的 理 
解 , 还 给 Ins trument 类 型 留 下 了 日 后 修改 的 余地 。 

Tradedouantity 伟 是 个 case 类 ， 它 建 模 了 一 个 值 对 象 。 值 对 象 一般 被 认为 是 不 可 变 的 ， 选 
用 Scala 的 case 类 作为 表达 手段 正 是 用 其 所 长 。case 类 的 特点 是 数据 成 员 目 动 具备 不 可 变性 质 ， 拥 
有 特别 简便 的 P EET Ze E , 而 且 默 认 实现 了 equals, hashCode 和 toS tring 方 法 。 ( Scala 
语言 的 case 类 特别 适合 用 于 建 模 值 对 象 。 详 细 介 绍 请 参阅 4.7 市 文献 [4]。) 

Scala 语 言 通过 隐 式 声明 人 提供 数据 类 型 之 间 的 自动 转换 。Scala 的 隐 式 特性 是 一 种 限定 了 词 
法 作用 域 的 语言 结构 ， 也 束 是 说 ， 只 有 当 一 个 模块 明确 导入 了 隐 式 定义 ,类 型 转换 才 在 该 模块 范 
围 内 生效 。 在 本 例 中 ， 按 照 声 明 ， 二 元 组 (Instrument，Int) 可 被 这 种 声明 隐 式 转换 成 一 个 
Tradedouantity 对 象 。 Scala 人 允许 用 (Instrument, Int) 这 种 字面 写法 来 表示 二 元 组 : 它 的 完 
整 写法 是 Tuple2[Instrument，Int]。( 前面 3.2.2 节 讨论 过 Scala 语 言 implicits 特 性 的 工作 原 
理 ， 如 有 需要 可 以 翻 回去 温习 一 下 。) 

最 后 说 到 账户 活动 报表 的 主体 抽象 ActivityReport@@ 包 含 账户 信息 和 当日 所 有 交易 活动 
的 一 个 列表 ， 列 表 元 素 是 交易 数量 和 交易 品种 组 成 的 二 元 组 。 

接 下 来 我 们 就 要 展开 一 系列 近 代 式 的 建 模 过 程 , 实现 分 组 函数 , 满足 客户 自 定 义 每 日 交易 报 
表 显 示 方 式 的 需要 。 我 们 打算 用 迭代 式 的 过 程 未 步 改 进 模型 ， 见 表 4-3。 

表 4-3 ”对 DSL 的 迭代 式 改进 
步 又 说 — RH 
创造 一 种 DSL 供 用 户 查 看 交易 活动 报 种 分 组 条 件 各 实现 一 个 专门 的 分 组 函数 ， 即 groupByInstrument 和 


表 ， 该 语言 有 按照 Instrument 和 9roupByQuantity 
ouantity 进 行 分 组 的 功能 实现 泛 型 分 组 羡 数 groupBy[T <% Ordered[T]]， 以 减少 重复 性 的 固定 代码 


















































那么 ， 我 们 先 来 实现 几 个 groupBy 图 数 。 
3. 第 一 步 : 专用 实现 
如 果 我 们 在 ActivityReport 抽 和 象 内 按 分 组 条 件 提 供 专用 的 grzoupBy 果 数 ,DSL 用 户 得 到 的 
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API 表 现 力 会 很 好 。 不 过 我 们 还 要 从 实现 的 角度 去 考虑 ， 使 用 方面 的 表现 力 并 非 判 定 DSL 完 善 程 
度 的 唯一 标准 o 代码 清单 4-9 给 出 了 按照 Ins trument 和 Quant T tv 分 组 的 专用 实现 o 注意 每 种 分 
组 条 件 都 需要 单独 定义 一 个 专用 函数 。 


代码 清单 4-9 ”活动 报表 ，groupBy 困 数 采 取 专 用 实现 


type Instrument = String 





case class TradedQuantity (instrument: Instrument, 
quantity: Int) 


implicit def tuple2ToLineItem(t: (Instrument, Int)) = 
TradedQuantity(t._1, t._2) 


case class ActivityReport (account: String, 
quantities: List[TradedQuantity]) ( 
import scala.collection.mutable. 


def groupByInstrument = { 


val m = 
new HashMap[Instrument, Set[TradedQuantity]] 用 mixin 方 式 定 义 
with MultiMap[Instrument, TradedQuantity] MultiMap 


for(q «- quantities) 


m addBinding (q.instrument, q) 
P for comprehension 


m.keys.toList 
.SortWith( < _) 


.map(m.andThen( .toList)) 
j P 按 票 据 品 种 分 组 


def groupByQuantity = í( 
val m = 
new HashMap[Int, Set[TradedQuantity]] 
with MultiMap[Int, TradedQuantity] 


for(q «- quantities) 
m addBinding (q.quantity, q) 


m.keys.toList 
.sortWith(_ < _) 
.map (m.andThen(_.toList)) 


j 

你 能 看 出 这 种 实现 方案 的 缺点 吗 ? 证 我们 先 简 单 看 下 代码 中 用 到 的 一 些 Scala 惯 用 法 ,然后 再 
作 进 一 步 的 分 析 。 

在 代码 清单 4-9 的 Activi tyReport 实 现 里 面 ,quantitiesH[ 以 含有 对 应 同一 个 Instrument 
对 象 的 多 个 条 目 ， 所 以 我 们 定义 一 个 MultiMap 容 器 来 归 置 从 quantities 取 出 的 条 目 ， 定 义 
MultiMap 容 器 用 到 Scala 的 mixin 语 法 。 在 HashMap 对 象 上 我 们 混入 trait MultiMap ， 就 得 到 
MultiMap 的 具体 实例 。 关 于 Scala 话 言 中 trait 和 mixin 特 性 的 详细 解释 ， 请 参阅 4.7 节 文献 [4]。 

在 裔 历 quantities 并 填充 HashMap 的 时 候 , 我 们 运用 了 Scala 语 言 的 for comprehension 特 性 
O. 它 和 命令 式 语言 中 的 for 循 环 有 明显 区 别 (6.9 节 谈 及 Scala 语 言 的 Monad 化 结构 的 时 候 ， 我 们 
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再 详细 讨论 for comprehension fF tE )。 然 后 ， 我 们 对 MultiMap 的 键 进 行 排序 并 建立 一 个 按 
Instrument 分 组 的 List 合 .该 List 的 每 个 元 素 都 是 一 个 set 容 需 ， 里 面 存放 了 某 票 据 品 种 对 应 
的 全 部 交易 数量 条 目 。 代 码 中 下 划 线 的 语法 含义 与 3.2.2 节 介绍 的 相同 。 

代码 清单 4-9 中 实现 的 主要 缺点 是 代码 重复 部 分 较 多 。 groupByInstrumentÍllgroupBy- 
Quantity 图 数 在 结构 上 完全 相同 ， 只 有 作为 分 组 依据 的 属性 不 一 样 。 你 应 该 马上 了 束 警觉 到 ， 这 
种 情形 违反 了 优秀 抽 和 象 的 设计 原则 。 万 一 你 还 没有 认识 到 其 中 的 缺点 ， 请 翻阅 附录 A， 那 里 介绍 
了 如 何 对 抽象 进行 精炼 以 握 除 非 本 质 复 杂 性 。 总 之 ,专用 实现 会 助长 重复 性 代码 ,这 就 是 问题 的 
证 结 。 而 且 ,， 如 有 果 日 后 向 ActivityReport 类 增加 更 多 分 组 条 件 , 那些 刻板 代码 只 会 一 再 重复 出 
现 。 怎 样 才能 纠正 当前 实现 的 缺点 呢 ? 我 们 需要 更 一 般 化 的 实现 方案 。 

4. 一 般 化 的 实现 

我 们 现在 就 把 实现 推广 到 更 一 般 化 的 情况 , 将 原来 分 立 的 一 系列 专用 方法 概括 成 一 个 通用 的 
Js 
代码 清音 4-10” 泛 型 gsroupBy 实 现 


type Instrument = String 























case class TradedQuantity(instrument: Instrument, 
quantity: Int) 


implicit def tuple2ToLineItem(t: (Instrument, Int)) = 
TradedQuantity(t._1, t._2) 


case class ActivityReport (account: String, 
quantities: List[TradedQuantity]) { 


import scala.collection.mutable._ hi 把 分 组 条 件 参 数 化 
{ 


def groupBy[T <% Ordered[T]](f: TradedQuantity => T) = 
val m = 
new HashMap[T, Set[TradedQuantity]] 
with MultiMap[T, TradedQuantity] 
for(q «- quantities) 
m addBinding (f(q), q) 
m.keys.toList.sort( < ).map(m.andThen( .toList)) 
j 
j 


新 的 实现 明显 更 简短 。 你 有 没有 发 现 , 泛 型 groupBy@@ 方 法 产生 了 更 有 力 的 抽象 ， 同 时 代码 
的 标致 度 也 在 同步 上 升 。 表 4-4 简 要 总 结 如 何 实现 泛 型 gsroupBy 方 法 。 


表 4-4 ”实现 泛 型 groupBy 方 法 
步 又 说 AA 
实现 泛 型 groupBy 方 法 将 groupBy 方 法 参数 化 ， 带 上 对 活动 报表 分 组 所 依据 的 类 型 
groupBvy 方 法 接受 上 函数 作为 输入 参数 ，f 对 分 组 条 件 建 模 。 这 里 体现 了 Scala 对 高 
阶 函 数 的 支持 。 函 数 可 以 像 其 他 数据 类 型 一 样 被 当做 参数 和 返回 类 型 传 来 传 去 。 
对 分 组 条 件 进 行 抽 象 的 时 候 可 以 利用 这 个 特点 ， 代 替代 码 清 单 4-9 中 的 专用 实现 
图 4-10 可 以 帮助 你 理解 泛 型 groupBy 函 数 的 执行 过 程 和 原理 
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下 面 我 们 来 观察 DSL 用 户 调 用 groupBy 的 过 程 ， 把 实现 步 又 从 头 到 尾 过 一 遍 。 这 样 的 练习 可 
以 帮助 你 理解 Scala 的 类 型 系统 是 怎样 在 背后 发 挥 作用 ， 上 默默 塑造 出 宣 于 表现 力 的 DSL 语 言 结 
构 的 。 

探究 现象 背后 的 来 龙 去 肪 是 DSL 设 计 工 作 的 重要 一 环 ，DSL 的 实现 者 尤其 应 该 全 面 、 细 致 地 
掌握 相关 知识 。 读 者 有 必要 反复 阅读 本 节 , 直到 完全 理解 Scala 语 言 如 何 进 行 方法 分 发 。 代 码 清 
4-10 中 短 短 15 行 的 实现 代码 里 面 隐藏 了 相当 数量 的 惯用 法 ,值得 你 好 好 学 习 。 当 你 能 够 看 清 各 种 
惯用 法 之 间 互 相 联系 的 脉络 ， 知 道 怎 样 将 它们 契合 在 一 起 满足 API 的 契约 ， 这 些 惯用 法 就 会 成 为 
你 手中 的 “工具 ”。 


val activityReport = 
ActivityReport("john doe", 






































List(("IBM", 1200), ("GOOGLE ", 2000), ("GOOGLE", 350), 
("VERIZON", 350), ("IBM", 2100), ("GOOGLE", 120022) 
println(activityReport groupBy( .instrument)) 


println(activityReport groupBy( .quantity)) 
与 其 用 文学 说 明 上 面 的 代码 ， 我 们 不 如 用 图 4-10 来 解释 activityReport groupBy 
(_.instrument) 调 用 前 后 发 生 的 一 系列 动作 。 


List(("IBM", 1000), ("DELL", 3000), ... ) 











这 一 步调 用 得 到 的 票据 
BEEJ 
在 隐 式 转换 定义 def tuple2ToLinertemBj PE cce 
0 作用 下 ， 二 元 组 被 转换 成 TradeQuantity 类 型 


List[TradedQuantity] 
o AOtIVILyRepOrt— —— ——»* groupBy (  .instrument) 
“john doe " o o 


Scala 语 言 的 占 位 符 语法 。f£ 的 函数 原型 (代码 清单 ”由 于 类 型 系统 推断 下 划 线 (_) 代表 的 
4-10) 说 明 该 占 位 符 是 TradeQuantity 类 型 是 一 个 Tradeouantity 对 象 ， 所 以 可 
以 对 它 调用 instrument 方 法 
图 4-10” 按 票据 品种 分 组 的 活动 报表 ( groupBy (_.instrument) ) 的 产生 过 程 。 顺序 
观察 图 中 所 有 步 台 ,将 图 解 与 代码 清单 4-10 的 DSL 实 现 ， 以 及 上 文 运 用 DSI 为 
客户 john doe 生 成 Activi tyReport 的 代码 片段 相对 照 


高 阶 蚊 数 的 应 用 场合 过 不 止 本 节 所 介绍 的 类 型 化 抽象 模式 。 所 有 现代 语言 , 无 论 是 否 静 态 关 
型 的 二 言 ， 全 都 文 持 高 阶 函 数 和 闭 包 。 本 节 讨 论 的 模式 实现 可 以 套用 到 不 同 的 情形 和 博 言 中 去 。 
实践 者 要 留心 使 用 模式 的 上 下 文 环境 ， 善 用 实现 语言 的 特点 把 事情 做 好 。 

我 们 的 目标 是 跨越 实现 语言 的 界限 ， 探 索 JVM 平 台 上 所 有 的 内 部 DSL 实 现 模式 。 无 论 你 选择 
静态 类 型 还 是 动态 类 型 的 实现 语言 ， 总 之 应 该 根据 DSL 建 模 所 需 的 能 力 去 挑选 合适 的 工具 。 
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下 一 节 将 讨论 怎样 运用 显 式 类 型 约束 来 表达 领域 逻辑 和 行为 。 这 种 表达 手段 不 适用 于 动态 类 
型 语言 。 不 过 只 要 类 型 系统 表现 力 充沛 ， 显 式 类 型 约束 可 以 成 为 得 力 的 建 模 工 具 。 它 对 于 使 DSL 
语言 简洁 有 着 惊人 的 效果 。 


4.3.2 ”运用 显 式 类 型 约束 建 模 领域 逻辑 


设计 领域 模型 的 时 候 , 抽象 必须 逐 照 领域 所 施 予 的 规则 和 约束 去 实现 其 行为 。Ruby、Groovy 
等 动态 类 型 语言 将 领域 规则 表达 为 运行 时 的 约束 。4.2 节 已 经 演示 过 Ruby 和 Groovy 语 言 的 反射 式 
元 编程 手法 , 讲解 过 怎样 实现 一 些 DSL 语 言 结构 来 建立 领域 规则 的 模型 。 本 方 将 首先 用 Ruby 语 言 
实现 一 个 运行 时 验证 示例 ， 然 后 演示 如 何 借助 Scala 语 言 的 静态 类 型 系统 更 简洁 地 表达 类 似 约束 。 

1. Ruby 语 言 的 运行 时 验证 

我 们 继续 沿用 代码 清单 4-6 中 的 Trade 抽象 这 个 例子 ， 先 前 已 经 用 Ruby 语 言 建立 一 个 简单 的 
领域 模型 。Traade 对 象 需要 对 应 一 个 Account 对 象 ， 即 客户 的 交 多 账户 。 人 代码 清单 4-6 把 账户 对 
象 表示 为 类 方法 attr_accessor。 交 易 系 统 的 领域 概念 里 存在 很 多 不 同类 型 的 账户 〈 人 参见 3.2.2 
万 的 补充 内 容 “ 金 融 中 介 系 统 : 客户 账户 ”)。 对 于 Trade 抽象 来 说 , 这 个 账户 被 限定 为 交易 账户 ， 
结算 账户 不 可 以 用 在 这 个 地 方 。 那 么 ,我们 每 次 建立 rraqe 对 象 并 为 它 设 置 Account 对 象 的 时 候 ， 
都 必须 验证 这 条 领域 规则 。 用 Ruby 语 言 应 该 怎么 写 呢 ?你 可 以 像 下 面 的 代码 片段 一 样 插入 常用 的 
检查 语句 : 


class Trade 
attr accessor :ref no, :account, :instrument, :principal 




















def initialize(ref, acc, ins, prin) 
aref no = ref 
raise ArgumentError.new (" 必 须 为 交易 账户 ") 
unless trading?(acc) 
Gaccount = acc 


HE. 

几 是 领域 模型 中 要 求 接受 交易 账户 的 地 方 ， 你 都 要 在 运行 时 反复 执行 同样 的 验证 。( 我 们 可 
以 采取 类 似 Rails 的 做 法 ,把 验证 操作 写成 类 方法 ,实现 声明 式 的 验证 , 但 验证 操作 终究 还 是 在 运 
行 时 进行 的 。 ) 而 且 每 一 处 验证 都 必须 明确 地 进行 单元 测试 ， 确 认 当 输入 非 交 易 账 户 的 时 候 领 域 
行为 如 同 预期 的 一 样 中 止 执行 。 以 上 重重 防范 必然 要 增加 代码 量 , 但 如 条 语言 允许 显 式 规定 类 型 
化 的 约束 条 件 ， 我 们 就 可 以 节省 这 部 分 代码 。 

在 静态 类 型 语言 里 , 我 们 可 以 把 约束 条 件 用 类 型 的 方式 规定 出 来 , 让 它们 在 编译 时 接受 编译 
带 的 检查 。 如 有 果 一 个 程序 能 正确 编译 ， 那 就 说 明 模 型 中 领域 行为 的 一 致 性 至 少 有 了 一 重 保 证 。 

2. Scala 语 言 的 显 式 类 型 约束 

我 们 尝试 用 Scala 语 言 建 模 Trade 对 象 , 对 其 中 的 账户 和 票据 加 上 一 些 具 有 领域 含义 的 约束 条 
件 。 经 过 本 例 的 练习 ， 你 将 认识 到 在 显 式 类 型 约束 的 作用 下 ，DSL 抽 象 无 需 实际 运行 就 已 经 得 到 
了 一 层 和 额外 的 一 致 性 保证 , 而 这 是 动态 类 型 语言 所 不 具备 的 。 假如 你 选择 静态 类 型 语言 作为 实现 
语言 ， 那 么 显 式 类 型 约束 绝对 是 不 可 或 缺 的 一 样 工 具 。 
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1 Scala 知 识 点 
口 基于 类 型 的 编程 方法 。 以 类 型 为 手段 ， 在 DSL 中 表达 领域 约束 。 泛 型 类 型 参数 和 抽象 类 
型 都 是 你 的 好 帮手 。 
O 抽 参 的 val 成 员 可 使 抽象 在 进入 最 后 的 实例 化 阶段 之 前 保持 开放 。 


每 个 Trade 对 象 都 对 应 一 个 Trading 账 户 。 我 们 用 Scala 语 言 对 这 条 规则 进行 建 模 。 代码 清单 
4-11 只 展示 了 Trade 对 象 中 与 本 段 讨论 相关 的 一 个 侧面 。 


代码 清单 4-11 带 上 类 型 化 约束 的 Trade 对 象 ，Scala 语 言 


trait Account 


trait Trading extends Account T 两 种 Account 类 型 
trait Settlement extends Account 
trait Trade { E Trading 子 类 型 的 账户 
type A «: Trading 
val account: A 
def valueOr: Unit ' Account 3: ji 


j 

从 这 个 示例 中 我 们 可 看 出 类 型 如 何 隐 式 落实 业务 规则 。 这 段 代 码 用 了 Scala 语 言 的 trait 特 性 建 
模 Account 和 Trade 对 和 象 ( 参见 4.7 节 文献 [4] )。 我 们 为 Trading 账 户 和 settlement 账 户 各 安排 
了 一 种 类 型 @。 程序 员 不 可 以 向 要 求 Traging 账 户 的 方法 传递 Settlement 账 户 。 编 译 髓 会 捍卫 
这 条 规则 ， 要 求 Trading 账 户 的 相关 业务 规则 不 需要 特别 去 检测 账户 类 型 是 否 符 合 要 求 。 

有 一 些 业 务 规则 是 在 代码 中 明确 规定 的 。 我 们 在 Trade 的 定义 里 对 抽象 类 型 A 设置 了 约束 
(<: Trading) 候 ， 因 此 不 能 使 用 Trading 之 外 的 任何 账户 类 型 来 实例 化 Trade 对 象 息 。 用 户 不 
需要 另外 增加 验证 账户 类 型 的 代码 ， 这 条 规则 的 检验 工作 同样 由 编译 需 代 劳 。 

“交易 ”是 指 参与 票据 买卖 双方 之 间 订 立 的 合约 。 如 果 想 复习 交易 的 一 些 性 质 ， 请 回头 翻阅 
1.4 广 的 补充 内 容 。 根 据 交 易 的 票据 种 类 的 不 同 ， 交 易 的 行为 、 周 期 过 程 和 计算 方法 都 有 差异 。 
ALX Z (equity trade ) 涉及 股票 与 现金 的 交换 。 而 当 被 交换 的 票据 属于 固定 收益 类 型 ,我 们 称 
之 为 固定 收益 交易 ( fixed income trade )。 关 于 股权 、 固 定 收益 等 票据 类 型 的 详情 ， 请 阅读 本 方 的 
补充 内 容 。 





















































e 全 融 中 介 系 统 ， 票 据 类 型 

票据 的 类 型 可 说 是 五 花 八 门 ， 而 它们 都 是 为 了 迎合 投资 者 和 发 行者 的 需要 而 设计 的 。 类 型 
不 同 ， 票 据 的 交易 、 结 和 展 过 程 的 生命 周期 也 不 同 。 

票据 主要 分 为 股权 (equity ) 和 固定 收益 ( fixed income ) 两 大 类 。 

股权 类 票据 又 可 进一步 分 为 普通 股 、 优 先 股 、 累 积 股 、 权 证 、 存 托 任 证。 国定 收 益 类 证 
券 〈 又 称 债 券 ) 包括 直接 债券 、 零 息 债 券 、 浮 动 利 率 债券 。 就 我 们 的 讨论 而 言 ， 并 无 必要 全 
面 了 解 这 方面 的 详细 内 容 ， 我 们 只 要 记 住 当 交 易 的 票据 类 型 不 同 ， 对 应 的 Trade 抽象 也 不 一 
样 即 可 。 
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下 面 的 代码 将 mraae 抽 有 旬 的 定义 进一步 具 化 , 建立 Equi tyTrade 和 FixedIncomeTrade 的 
檬 型 。 


代码 清单 4-12 EquityTrade 和 FixedIncomeTrade 模 型 


trait Instrument 


trait Stock extends Instrument 
trait FixedIncome extends Instrument 


trait EquityTrade extends Trade { . EquityTrade 作 用 于 stock 
type S <: Stock Sn 
9 票据 类 型 
val equity: S 


def valueOf { 


Pd ua 
) 'e 交易 计 值 的 具体 实现 
trait FixedIncomeTrade extends Trade ( S FixedIncomeTrade(f fH 
type FI <: FixedIncome T FixedIncome 
val fi: FI 
def valueOf { 6 票据 类 型 
j 交易 计 值 的 具体 实现 


Í 

代码 中 对 所 交易 票据 的 类 型 进行 了 约束 ， 类 似 于 代码 清单 4-11 中 对 account 所 做 的 显 式 约 
束 。 此 业务 规则 照旧 由 编译 希 隐 式 地 强制 实施 。 

我 们 分 别 规定 了 EquityTrade 类 型 和 FixedIncomeTrade 类 型 @。 程序 员 不 可 以 把 
FixedIncomeTrade 对 象 传 递 给 要 求 EquityTrade 对 象 的 方法 。 编 译 右 会 捍卫 此 规则 ， 对 具体 
的 Trade 类 型 有 所 要 求 的 业务 规则 不 需要 特别 去 检测 交易 类 型 是 否 符合 要 求 。 

EgquityTrade 人 负责 处 理 stock 交 易 @@， FixedIncomeTrade 人 负责 FixedIncome 交 易 @， 我 
们 据 此 分 别 对 抽象 val ( equity 人 @ 和 fi@ ) 进行 了 约束 。 以 上 基本 业务 规则 完全 在 编译 器 层面 
得 到 保证 ， 程 序 员 无 需 编 写 一行 验 证 代码 。 

value0f 方 法 是 多 态 的 、 类 型 化 的 ,不 同 的 Account 和 Instrument 类 型 对 应 着 不 同 的 Trade 
抽象 ， 也 分 别 对 应 着 不 同 的 valueof 方 法 实现 (9959). 

我 们 运用 类 型 化 抽象 手段 , 并 且 对 值 和 类 型 施加 显 式 约束 , 在 没有 写 一 行 过 程式 逻辑 的 情况 
下 成 功 描述 了 相当 数量 的 领域 行为 。 不 仅 代 码 规 模 缩 小 了 ， 单 元 测试 的 数量 也 减少 了 ， 下 接 降低 
了 编号 和 维护 的 负担 。 当 你 维护 代码 的 时 候 , 如 条 类 型 标注 能 描述 性 地 说 明 模 型 背后 的 领域 含义 ， 
那么 维护 工作 不 是 会 顺利 得 多 吗 ? 

对 比 之 前 关于 用 动态 语言 实现 DSL 的 讨论 ， 本 市 讨论 中 体现 出 来 的 实现 思路 很 不 一 样 。 现 在 
我 们 总 结 一 下 什么 是 静态 类 型 思维 ， 看 它 和 Ruby 或 Groovy 的 思维 方式 有 何 区 别 。 









































4.3.3 经 验 总 结 : 类 型 思维 


经 过 本 市 的 学 习 , 你 已 经 知 直 对 于 设计 表现 力 丰 富 的 领域 抽象 , 类 型 可 以 起 到 很 重要 的 作用 。 
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由 于 拥有 带 态 类 型 检查 这 张 安全 网 , 静态 类 型 的 实现 天 生 就 具备 一 层 正 确 性 保障 , 这 就 是 它 与 前 
面 的 Groovy 和 Ruby 示 例 的 主要 区 别 。 类 型 化 的 代码 只 要 能 通过 编译 ， 就 足 矣 证 明 它 满足 了 相当 
数量 的 领域 约束 。 在 第 6 章 用 Scala 设 计 更 多 DSL 的 时 候 ， 我 们 会 继续 讨论 这 个 议题 。 图 4-11 总 结 
了 本 市 介绍 过 的 儿 种 内 部 DSL 模 式 。 


内 部 DSL 模 式 


限制 了 词法 作用 域 的 隐 式 转换 


显 式 .类 型 约束 

















图 4-11 ”类 型 化 内 骸 方 式 下 用 于 内 部 DSL 的 程序 结构 。 你 可 以 从 这 些 模 式 中 学 会 运用 
类 型 思维 去 驾驭 编程 语言 
我 们 讨论 了 运用 静态 类 型 语言 实现 内 部 DSL 的 过 程 中 常会 使 用 的 厂 干 午 要 模式 。 虽然 静态 类 
型 语言 没有 动态 二 言 那样 的 元 编程 绝技 ， 但 类 型 化 抽象 同样 是 非 币 简洁 有 力 的 DSL 开 发 手段 。 











ATRA 

KERRE EUR EUM EAS ITR PEN, AE E XU, 
然后 围绕 类 型 组 织 相关 的 业务 规则 。 很 多 业务 规则 会 自动 被 编译 器 强制 实施 , 因此 你 不 需要 专 
门 为 之 编写 代码 。 如 果实 现 语言 拥有 合适 的 类 型 系统 ,那么 DSL 的 简洁 程度 不 会 亚 于 动态 语言 
的 实现 。 


到 目前 为 止 , 我 们 介绍 了 不 少 内 部 DSL 实 现 模式 ,， 有 利用 类 型 系统 抽象 出 领域 规则 的 ， 也 有 
利用 牡 主语 言 的 元 编程 能 力 做 反射 的 。 下 一 节 将 要 介绍 的 模式 能 让 语言 运行 时 玫 你 编写 代码 。 你 
要 用 生成 的 代码 来 创作 侧 洁 的 DSL。 


4.4 生成 式 DSL: 通过 模板 进行 运行 时 代码 生成 
元 编程 有 许多 侧面 ， 例 如 上 文 展 示 过 不 少 反 射 式 元 编程 的 例子 。VM 在 运行 时 对 各 种 元 对 象 


进行 探测 ， 找 出 当前 上 下 文 内 可 用 的 对 象 ， 然后 神奇 地 调用 它们 。 我 们 还 可 以 从 不 同 的 角度 来 看 
行 元 编程 。 其 实 ， 元 编程 最 经 典 的 定义 是 : 编号 “编号 代码 ”的 代码 。 
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在 不 同 的 堵 言 里 面 ， 这 个 定义 的 确切 含义 也 不 一 样 。Lisp 等 语言 提供 编 详 时 元 编程 能 力 ， 我 
们 在 2.5.2 广 已 经 见识 过 。Ruby、Groovy 等 语言 提供 运行 时 元 编程 能 力 ， 可 以 在 运行 时 通过 eval 
和 方法 的 动态 分 发 生成 代码 。 本 市 将 用 一 个 具体 的 例子 问 你 展示 如 何 减少 直接 编写 的 代码 , 转 而 
依靠 语言 运行 时 生成 余下 的 部 分 ， 以 此 达到 使 DSL 抽 和 象 表面 紧凑 的 目的 。 你 可 能 会 问 ， 这 种 做 法 
为 什么 很 有 意义 ? 

















4.4.1 生成 式 DSL 的 工作 原理 


设计 生成 式 的 DSL 可 以 少 写 死板 重复 的 代码 。 语 言 将 通过 元 编程 手段 代 蔡 你 生成 代码 。 图 
4-12 形 象 地 说 明了 运行 时 元 编程 生成 代码 的 情况 。 








程序 


操控 对 象 及 元 对 象 


元 对 象 









<= 开发 环境 


元 对 象 生成 各 种 
—€— 运行 时 元 件 材料 
运行 时 环境 => 














图 4-12 ”运行 时 元 编程 方法 在 运行 时 根据 元 对 象 产生 代码 。 元 对 象 生成 更 多 对 和 象 ， 
结果 是 减少 了 死板 代码 的 数量 


程序 员 除 了 直接 编写 一 部 分 对 象 , 还 操控 元 对 象 在 程序 运行 的 时 候 产 生 更 多 的 程序 元 件 。 这 
些 生成 的 元 件 材料 就 相当 于 语言 运行 时 帮 你 编写 的 代码 。 这 就 好 比 你 为 了 证 自己 集中 精力 对 付 更 
重要 的 工作 而 精明 地 指使 助手 , 让 他 按照 你 的 指令 照顾 好 所 有 的 例 行 工作 。 那么 元 对 象 具体 是 什 
么 样子 ”它们 在 什么 地 方 ? 它 们 怎样 完成 你 的 要 求 ?我们 一 起 用 Ruby 语 言 设计 一 些 生 成 式 DSL,， 
边 做 边 解 释 。 














4.4.2 ”利用 Ruby 元 编程 实现 简洁 的 DSL 设 计 
关于 证 券 交 易 和 结算 领域 , 本 章 已 经 围绕 “交易 " 谈 了 不 少 内 容 。 在 现实 的 应 用 程序 中 , Trade 
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是 一 个 非常 复杂 的 模块 , 含有 大 量 的 领域 对 象 和 相关 的 业务 规则 、 约 束 条 件 、 验 证 逻辑 。 其 中 一 
些 验证 逻辑 是 通用 的 , 适用 于 同一 上 下 文 内 的 所 有 相似 属性 ,而 另外 一 些 验证 逻辑 专用 于 特定 的 
上 上 下文， 需要 在 类 定义 中 明确 地 写 出 来 。 但 不 管 哪 一 种 验证 逻辑 ， 其 一 般 的 执行 过 程 是 相同 的 ， 
可 以 集中 在 一 起 ， 也 可 以 通过 合适 的 技术 手段 统一 生成 。 

我 们 来 看 看 Ruby 元 编程 在 这 方面 有 什么 办 法 。 

1. 用 类 方法 对 验证 逻辑 进行 抽象 

假设 你 正在 用 Rails 开 发 交易 程序 , 其 中 用 了 ActiveRecord 进 行 持 久 化 ,那么 按照 一 般 惯 例 ， 
Trade 模型 中 会 出 现 这 样 的 代码 片段 : 


class Trade < ActiveRecord::Base 























has one :ref_no 
has_one :account 
has_one : instrument 
has_one : currency 
has_many :tax_fees 
dU .. 
validates presence of :account, :instrument, :currency 
validates uniqueness of  :ref no 
dH .. 
end 








如 果 你 有 过 开发 Rails 项 目的 经 验 ， 肯定 知道 上 面 类 定义 中 最 后 两 行 的 作用 。 这 两 个 Ruby 类 方 
法 (validates presence of 和 和 validates_unigqueness_of ) 封 芭 了 一 些 针 对 属性 的 验证 逻 
辑 ， 设 置 属 性 的 时 候 ， 传 进去 的 参数 要 经 过 它们 的 检查 。 注 意 看 那些 作用 于 属性 的 领域 约束 ， 它 
们 被 干净 利沙 地 从 公开 的 API 界 面 上 剥离 出 来 ， 很 好 地 示范 了 什么 是 精 炬 的 模型 设计 。 关 于 抽象 
设计 的 精炼 原则 ， 请 翻阅 附录 A.3。 在 运行 时 ， 这 些 方法 会 生成 相应 的 代码 片段 去 验证 各 属性 。 














1 Ruby 知 识 点 
O Ruby 元 编程 基础 知识 。Ruby 的 对 象 模 型 包含 许多 可 以 用 于 反射 式 和 生成 式 元 编程 的 元 
件 材 料 ， 例 如 类 、 对 将、 实例 方法 、 类 方法 、 单 例 方法 等 。Ruby 元 编程 机 制 允 许 你 在 
运行 时 探查 其 对 象 模型 ， 也 允许 动态 地 改变 行为 或 生成 代码 。 
口 模块 ， 以 及 通过 mixin 来 扩展 现 有 抽象 的 时 候 ， 模 块 在 其 中 所 起 的 作用 。 


2. 用 mixin 动 态 生成 方法 

我 们 之 前 在 代码 清单 4-6 中 用 mixin 手 法 设计 过 Trade 抽 象 ， 现 在 做 点 儿 类 似 的 事情 。 我 们 希 
望 在 Trade 的 类 定义 内 写 人 内 联 的 验证 逻辑 , 但 同时 和 硕 望 把 调用 和 有 异 稍 报 告 方面 的 烦 珊 构造 隐藏 
起 来 ， 把 那些 重复 出 现 的 死板 代码 推 到 运行 时 去 生成 。 完 成 后 的 抽象 应 该 是 下 面 的 样子 : 


class Trade 


include ... 
e include 什 么 ? 


attr accessor :ref no, :account, :instrument 








trd validate :principal do |val| 


val » 100 e 验证 逻辑 以 块 的 形式 出 现 
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end 


RE 2s 


end 

x EHE UTEQ T v eerP TERKA (我 很 快 会 说 明 少 了 什么 ) tra_valiadate 就 是 负责 验 
证 的 “装置 ”， 它 要 对 以 块 的 形式 传人 的 验证 逻辑 仿生 成 运行 时 调用 代码 。 

可 是 traq_validqate 是 从 哪里 来 的 呢 ? 我 们 必然 要 在 别 的 什么 地 方 定义 这 个 方法 , 然后 把 它 
和 Trade 类 的 主体 代码 联系 起 来 。 答 案 也 许 就 隐藏 在 @@ 省 略 的 部 分 , 我 们 把 代码 再 看 清楚 一 点 儿 。 
先 不 管 rraaqe 模 型 怎么 获得 trdq_validqate 方 法 ， 先 来 看 定义 类 方法 traq_validate 的 Ruby 模 块 
TradeClassMethods: 








module TradeClassMethods 
def trd validate(attribute, &check) - 为 属性 生成 设置 方法 
define method "#{attribute}=" do |val| 
raise 'Validation failed' unless check.call(val) 


instance variable set("Gst(attributej", val) 
end 
define method attribute do 
instance variable get "@#{attribute}" P 为 属性 生成 获取 方法 
end 
end 
end 





这 段 代 码 做 了 哪些 事情 ? 它 利 用 Ruby 语 言 在 运行 时 动态 定义 方法 的 能 力 ， 为 传递 给 
trd_validate 方 法 的 属性 生成 setter 人 和 getter@ 方 法 ， 此 外 还 顺便 生成 代码 去 调用 用 户 以 
块 的 形式 传人 的 验证 逻辑 。 真 不 错 ! 想 想 这 种 元 编程 手段 给 每 一 次 调用 trgd_validate 省 下 了 多 
少 代 码 ， 再 乘 以 所 有 需要 trad_valiaate 经 手 的 属性 数量 ， 这 一 代码 量 相当 可 观 。 

3. 最 后 组 装 

一 切 就 绪 ， 到 了 最 后 组 装 起 来 的 时 刻 。 我 们 再 定义 一 个 模块 把 rradqeclassMethodqs 模 块 和 
Trade 类 精 合 在 一 起 ,使 trd_valigdate 成 为 Trade 的 一 部 分 。 代 码 清 单 4-13 起 到 最 后 画龙点睛 
的 作用 。 


代码 清单 4-13 ”含有 领域 验证 的 Trade 抽象 


## enable trade validation.rb 











require 'trade class methods' 
module EnableTradeValidation 
def self.included(base) 
base.extend TradeClassMethods 
end 
end 


t4 trade.rb 
require 'trade class methods' 
require 'enable trade validation' 


class Trade 
include EnableTradeValidation 


attr accessor :ref no, :account, :instrument 
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trd validate :principal do |val| 
val » 100 
end 


d .. 
end 


本 例 至 此 大 功 告 成 。 为 了 避免 在 接 编写 验证 逻辑 的 重复 劳动 , 我 们 杀 吴 体验 了 一 把 运用 元 编 
程 手段 生成 验证 逻辑 代码 的 活动 。 注 意 ， 人 代码 是 在 Ruby VM 执 行程 序 的 时 候 ， 也 就 是 运行 时 生 
成 的 。 








本 市 要 点 

本 章 讨论 的 大 多 数 模 式 重 点 放 在 降低 DSL 的 烦琐 程度 , 同时 提高 表现 力 上 。Ruby 和 Groovy 
具有 很 强 的 运行 时 元 编程 和 代码 生成 能 力 。 当 你 发 现 DSL 的 实现 代码 显露 出 重复 的 迹象 ， 请 撼 
量 一 下 要 不 要 打开 元 编程 的 锦 吉 。 与 其 自己 写 那 些 死板 代码 ， 不 如 让 语言 运行 时 帮 你 写 。 








本 和 曹 虽 长 ， 但 绝 不 沉 问 。 我 们 一 下 在 演练 各 式 绝 招 ， 将 来 你 动手 编写 DSL 的 时 候 肯 和 定 会 铂 上 
用 场 。 看 第 一 遍 的 时 候 感 党 没 学 到 家 也 不 要 紧 ， 当 你 擎 握 了 这 些 技巧 青 后 的 总 体 思 路 ， 就 能 看 透 
问题 的 实质 ， 用 最 恰当 的 方式 刻画 解答 域 。 现 在 不 妨 换 换 脑子 ， 在 编程 能 力 方面 给 上 自己 充 下 电 ， 
因为 下 面 即 将 讨论 一 种 古老 的 程序 开发 范式 在 JVM 平 台 上 的 新 发 展 。 我 们 要 说 的 是 Clojure 一 一 改 
头 换 面 出 现在 JVM 上 的 Lisp 元 编程 。Ruby 和 Groovy 元 编程 主要 基于 运行 时 代码 生成 ， 而 Clojure 
元 编程 是 通过 宏 在 编译 时 完成 的 。 我 们 将 探讨 宏 会 给 内 部 DSL 市 来 怎样 的 设计 思路 。 


4.5 "ER DSL: 通过 宏 进 行 编译 时 代码 生成 


SK pne 那 我 们 就 开始 吧 。Ruby 和 Groovy 的 生成 式 元 编程 在 运行 时 产生 代码 , 使 DSL 表 面 
语法 保持 紧凑 ， 让 语言 运行 时 代 蔡 你 编写 那些 死板 代码 。 而 对 于 Clojure (JVM ERJLisp), 一 方 
面 你 会 获得 所 有 代码 生成 方面 的 好 处 ， 另 一 方面 它 又 没有 Groovy 和 Ruby 那 种 运行 时 负担 。( 关于 
Clojure 语 言 的 详情 ， 请 访问 http://clojure.org。) Clojure 语 言 按照 其 创造 者 Rich Hickey 的 设计 ， 拥 
有 Lisp 语 言 的 语法 和 语义 ， 同 时 叉 能 无 颖 地 集成 Java 的 对 象 系 统 。 关 于 这 种 语言 及 其 运行 时 的 详 
情 ， 请 参阅 4.7 节 文献 [3]。 





















































4.5.1 ”开展 Clojure 元 编程 


Clojure 是 一 种 动态 类 型 语言 ， 实 现 了 “网 子 类 型 ", 还 提供 强大 的 函数 式 编程 能 力 。 本 市 我 
们 重点 讨论 它 通过 “ 宏 ” 机 制 提供 的 代码 生成 能 

Clojure 通 过 宏 来 进行 的 代码 生 成 属于 一 种 编译 时 元 编程 ,我 们 在 2.3.1 市 提 到 过 。 如 采 你 不 珊 
悉 Lisp 或 Clojure 编 译 时 宏 的 工作 原理 和 基本 概念 ， 请 阅读 附录 B。 图 4-13 简 要 概括 了 编译 时 元 编 
程 系 统 的 事件 流程 。 开发 者 在 程序 中 以 宏 的 形式 定义 高 阶 抽象 , 然后 高 阶 抽象 在 编译 阶段 被 展开 
成 正式 的 Clojure 代 码 成 分 。 
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程序 


操控 对 象 及 元 对 象 






对 象 





BE 


宏 展开 (将 元 对 象 


“= 展开 成 有 效 的 形式 ) 








编译 时 环境 => 





运行 时 环境 => 运行 时 环境 仅 包 含有 效 的 代码 成 分 


图 4-13 ” 编 详 时 元 编程 通过 宏 展 开 的 方式 产生 代码 。 注 意 代 码 产 生 的 时 间 是 在 编译 阶 
段 ， 因 此 没有 任何 额外 的 运行 时 开销 ， 与 图 4-12 的 情况 不 同 

















具体 的 实现 细 市 我 们 等 一 下 再 谈 , 现在 先 对 下 面 将 要 涉及 的 问题 域 做 一 点 分 析 。 当 客户 委托 
中 介 交 易 〈 无 论 洋 入 还 是 卖 出 ) 某 一 品种 的 票据 时 ， 将 依次 发 生 以 下 动作 : 

(1) 中 介 回 交易 所 提请 交易 ; 

(Q2) 各 中 介 按 照 委 托 内 容 完 成 中 介 间 交易 ， 引 发 成 交 ; 

(3) 成 交 结 果 被 分 配 到 各 客户 账户 ， 产 生 客户 交易 。 

我 们 试 者 实现 从 成 交 结 果 产 生 客 户 交 易 的 分 配 过 程 。 在 现实 中 ， 委 托 、 成 交 结 果 、 客 户 交 多 
之 间 是 多 对 多 关系 。 为 了 让 例子 简单 一 些 ， 我 们 假设 成 交 结果 与 客户 交易 之 间 是 一 对 一 的 关系 。 
Clojure 的 鸭子 类 型 将 在 这 个 用 例 的 建 模 过 程 中 贡献 力量 。 




















1 Clojure 知 识 点 
口 前 级 语法 和 函数 式 思 维 。Clojure 的 语法 建立 在 “S 表 达 式 ”的 基础 上 ,采用 前 级 表示 法 
( prefix notation )。Clojure 的 语法 非常 规则 ， 标 榜 绝 对 一 致 性 ,例如 没有 运算 符 优先 级 。 
Clojure 是 函数 却 语 言 ， 各 种 模块 被 组 织 成 函数 的 形式 。 
O Clojure 的 map 数 据 结构 首 遍 用 于 对 象 建 模 。 
O 宏 可 用 于 定义 DSL 的 语法 扩展 。 将 宏 在 编译 时 生成 代码 的 能 力 应 用 到 DSL 设 计 中 ， 有 
利于 使 DSL 语 句 简洁 。 
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4.5.2 ”实现 领域 模型 

我 们 来 思考 如 何 用 Clojure 定 义 交易 与 成 交 结 果 。 交易 和 成 交 结 果 大 致 含有 相同 的 信息 ,区 别 
在 于 成 交 结果 包含 一 个 中 介 账 户 , 而 交易 是 在 下 单 客户 的 客户 账户 上 发 生 的 。 下 面 的 代码 片段 分 
别 给 出 了 交易 和 成 交 结果 的 一 个 示例 : 




















e Clojure žk F m 
{:ref-no "tr-123" 
:account {:no "cl-al" :name "john doe" :type ::trading} 
:instrument "eq-123" :value 1000)) 
(def ex1 
(:ref-no "er-123" 
:account {:no "br-al" :name "j p morgan" :type ::trading) 
:instrument "eq-123" :value 1000}) 


在 交易 的 数据 结构 之 内 ， 有 一 个 独立 的 账 尸 数据 结构 。 账 户 含 有 一 个 :type 必 性， 表明 它 
是 交易 账户 还 是 结算 账户 。 该 账户 类 型 属性 被 建 模 为 Clojure 关 键 字 的 形式 人 @， 只 起 到 一 个 符号 
标识 的 作用 ， 求 值 后 等 于 日 映 。Clojure 关 键 子 提供 快速 的 相等 性 测试 ， 被 当做 轻 量 级 的 肖 量 子 
符 串 来 使 用 。 关 于 客户 账户 的 概念 及 其 不 同类 型 ， 请 阅读 3.2.2 节 的 补充 内 容 “金融 中 介 系 统 : 
客户 账户 。 

我 们 在 代码 清单 4-14 中 定义 两 个 函数 : 其 一 检查 给 定 的 账户 是 否 为 交易 账户 ， 其 二 分 配 成 区 
结 灯 到 一 个 客户 账户 上 ， 疗 生 客户 交易 。 后 者 是 我 们 当前 面 对 的 主要 问题 域 用 例 。 我们 先 把 函数 
定义 出 来 ,再 思考 哪些 地 方 属于 死板 代码 ， 可 以 通过 宏 来 生成 ， 让 实现 更 简洁 。 


























代码 清单 4-14 ”成 交 结 果 分 配 函 数 
(defn trading? 
" 若 账 户 为 交易 账户 ， 返 回 true" 
[account] 
(= (:type account) ::trading)) 


(defn allocate 
"分 配 成 交 结 果 到 客户 账户 并 产生 客户 交易 " 
[acc exe] 
(cond 
(nil? acc) (throw (IllegalArgumentException. 


"账户 不 可 为 空 ") ) 
(= (trading? acc) false) (throw (IllegalArgumentException. + 验证 
"必须 为 交易 账户 ") ) 
:else {:ref-no (generate-trade-ref-no) 
:account acc 
:ijnstrument (:instrument exe) :value (:value exe)])) 


MWZXallocate KÁN, BEDA RTT conaitHJB):elsednuJrp. WAAN 
件 子 句 是 交易 子 系统 内 任何 操作 都 必须 满足 的 验证 。 对 于 任何 作用 于 交易 的 方法 , 我 们 都 要 确 
认 交 易 账 户 是 非 空 的 实体 ， 还 要 确认 它 确实 是 一 个 交易 账户 而 非 结 算账 户 。 以 上 内 容 构 成 了 
allocate 方 法 的 主要 界面 。allocate 方 法 含有 一 些 非 本 质 的 代码 复杂 性 , 有 必要 分 解 到 核心 的 
API 实 现 之 外 。 
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4.5.3 ”Clojure 宏 之 美 


既然 我 们 在 allocate 方 法 内 做 的 那些 验证 其 实 广泛 适用 于 所 有 的 交易 功能 ， 何 不 把 它们 重 
构成 可 重用 的 实体 呢 ? 那 样 的 话 ， 我 们 将 获得 一 个 可 以 检查 所 有 账户 的 验证 函数 ， 类 似 于 4.4.1 
节 定 义 Ruby 模 块 Tradec lassMethods 时 我 们 对 trq_validate 所 做 的 人 处理。 不 过 这 次 所 用 的 手 
段 一 一 宏一 一 有 其 鲜明 的 优点 ， 请 看 插 和 内容。 


DA Clojure 的 宏 特 性 可 用 于 在 编译 阶段 生成 代码 ; 编译 后 ， 宏 被 展开 成 普通 的 Clojure 
代码 成 分 。 优 点 有 两 重 : 

(1) 宏 在 编译 阶段 被 内 联展 开 ， 避免 了 部 数 调 用 的 开销 ; 

(2) 代码 更 具 可 读 性 ， 因 为 不 需要 用 到 lambda 表 达 式 。 如 果 用 高 阶 函 数 来 实现 的 话 ， 

lambda 表 达 式 不 可 避免 。 

下 面 的 例子 可 以 让 你 看 清楚 宏 的 用 法 和 特点 。 例 中 定义 了 一 个 宏 , 它 用 在 语句 里 面 形式 上 很 
像 一 般 的 Clojure 控 制 抽 象 ， 但 其 实 里 面 封 六 了 验证 逻辑 。 


(defmacro with-account 
[acc & body] 








` (cond 
(nil? ~acc) (throw (IllegalArgumentException. 
"账户 不 可 为 空 ") ) 
(2 (trading? -acc) false) (throw (IllegalArgumentException. 


"必须 为 交易 账户 ") ) 
:else -Gbody)) 


注意 ，pbody 内 可 含有 不 定数 量 的 form， 它 们 在 非 符 号 类 型 拼接 (splicing unquote ) 运算 ~@ 
的 作用 下 被 插入 到 生成 的 代码 中 。( 关于 非 符 号 类 型 拼接 的 工作 原理 , 详情 请 参阅 4.7 市 文献 [2]。 ) 
如 果 我 们 把 验证 逻辑 实现 成 一 个 函数 ， 不 可 避免 地 要 用 到 lambda 表 达 式 。 而 当 我 们 用 
with-account 宏 来 定义 allocate 图 数 时 ， 代 但 会 十 分 清晰 易 仅 : 
(defn allocate 
"分 配 成 交 结 果 到 客户 账户 并 产生 客户 交易 " 
Rn omaes 





(:ref-no (generate-trade-ref-no) 
:account acc 
instrument (:instrument exe) :value (:value exe)])) 


现在 ,实现 只 需要 重点 关注 核心 的 领域 逻辑 ， 与 代码 清单 4-14 相 比 何洁 明了 得 多 。 全 部 的 异 
沼 处 理 部 分 , 还 有 全 部 的 非 本 质 复杂 性 ,完全 被 分 解 出 来 放 在 宏 里 面 ,同时 还 没有 增加 任何 运行 
时 开销 。with-account 安 的 功用 不 再 局 限于 allocate 的 实现 ; 它 成 了 一 个 通用 的 控制 结构 ， 
看 上 去 和 一 般 的 Clojure 语 句 成 分 没什么 两 样 ， 而 且 可 以 被 所 须要 验证 交易 账户 的 API 章 用 。 











本 市 要 点 
本 节 的 重点 是 使 DSL 实 现 简 洁 而 又 不 失 表 现 力 。 这 个 思路 也 贯穿 了 全 章 , 各 节 在 阅 述 过 程 
中 呈现 的 差别 只 在 于 如 何 实现 这 个 思路 。 
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Clojure 宏 除了 可 使 DSL 简 洁 , 还 对 运行 时 性 能 没有 任何 影响 。Clojure 语 言 本 身 的 可 塑性 非 
常 强 ， 允 许 你 精确 地 表达 DSL 所 需 的 语法 和 语义 。Lisp 家 族 这 方面 的 能 力 非常 突出 ， 天 生 适 合 
用 于 建 模 真 实 的 世界 。 








不 同形 式 的 生成 式 DSL 午 可 以 代 符 你 写 代 码 。 但 依 助 敏 镜 的 观察 力 ,， 你 肯定 已 经 察 沉 不 同 语 
言 实 现 ， 以 及 不 同 代 码 生 成 时 机 之 间 的 差别 。4.4 节 讨论 了 运行 时 代码 生成 ， 本 节 讨 论 如 何 通过 
Clojure 安 实现 编译 时 代码 生成 。 两 种 条 略 各 有 优 缺 点 ,你 必须 仔细 拓 量 所 有 的 选项 才 好 决定 一 个 
最 佳 的 实现 方案 。 





4.6 ”小结 


本 革 漫 长 的 学 习 之 旅 已 接近 尾声 , 你 的 耐心 值得 称赞 。 我 们 一 路 针对 金融 中 介 系 统领 域 的 问 
题 厂 段 展开 讨论 ， 几 乎 涵盖 了 所 有 的 内 部 DSL 实 现 模 式 。 


要 点 与 最 佳 实践 

设计 内 部 DSL 的 时 候 , 你 应 遵循 实现 语言 的 最 佳 实践 。 按照 一 种 语言 的 习惯 去 运用 它 ， 我 
们 总 是 能 在 表现 力 和 性 能 之 间 取 得 最 佳 的 平衡 。 

Ruby、Groovy 等 动态 语言 给 予 使 用 者 非常 大 的 元 编程 能 力 。 请 借助 这 些 能 力 去 设计 DSL 
抽象 和 背后 的 语义 模型 ， 你 会 得 到 漂亮 的 简洁 语法 ， 而 死板 代码 则 交 由 语言 运行 时 去 处 理 。 

对 于 像 Scala 这 样 的 实现 语言 ， 静 态 类 型 是 你 的 好 帮手 。 我 们 建议 大 家 运用 类 型 抽象 来 表 
达 大 部 分 业务 逻辑 ， 让 编译 器 充当 DSL 语 法 的 第 一 道 验证 防线 。 

对 于 Clojure 这 类 具有 编译 时 元 编程 能 力 的 语言 ， 请 用 宏 来 自 定义 语法 结构 。 你 会 得 到 不 
输 于 Ruby 实 现 的 简洁 语法 ， 同 时 不 会 遭遇 额外 的 运行 时 负担 。 





Ruby, Groovy 等 动态 语 言 提 供 了 强大 的 反射 式 元 编程 范式 , 用 在 DSL 实 现 中 对 语言 简洁 性 和 
表现 力 都 有 很 大 的 帮助 。 这 类 语言 允许 你 在 运行 时 操控 其 元 模型 ,因此 特别 适合 用 来 实现 较为 动 
态 的 结构 。 

本 半 癌 你 演示 了 动态 builder 和 淡 饰 各 的 制作 方法 ， 教 你 变 驭 元 编程 的 力量 。 而 且 ， 相 信 你 还 
学 会 了 运用 静态 类 型 以 声明 式 风 格 表达 领域 约束 。 最 后 ,我们 学 习 了 如 何 实现 生成 式 DSL,， 在 编 
译 时 或 运行 时 生成 代码 。 

阅读 完 本 章 , 你 应 该 能 够 从 语言 惯用 法 和 最 佳 实践 的 角度 去 思考 问题 ,以 之 为 标杆 来 衡量 日 
己 的 DSL 实 现 。 我 们 谈 了 很 多 模式 ， 你 不 难 在 目 己 的 DSL 模 型 中 为 它们 找到 适用 的 上 下 文 。 前 面 
几 章 一 直 谤 泛 地 赞扬 基于 DSL 的 开发 , 本 章 终于 把 问题 域 的 特定 场景 和 具体 的 实现 结构 联系 起 来 
了 。 本 和 草 为 你 的 DSL 风 景 线 增添 了 以 下 主要 “景色 ”: 

a 你 现在 知道 如 何 发 挥 实现 语言 内 在 的 力量 去 提高 DSL 的 简洁 度 ; 

口 如 果 选 用 静态 类 型 语言 ， 你 可 以 围绕 类 型 化 的 抽象 去 建立 DSL 模 型 ; 
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口 如 果实 现 语言 具备 元 编程 能 力 , 你 可 以 利用 这 一 点 使 DSL 的 语法 更 紧凑 , 让 语言 运行 时 或 
者 编译 设施 代替 你 生成 代码 。 
接 下 来 我 们 应 该 继续 探索 更 多 来 自 现实 世界 的 例子 。 下 一 章 我 们 会 讨论 动态 类 型 语言 家 族 ， 
看 看 它们 对 于 实现 具有 良好 表现 力 的 DSL 有 什么 好 办 法 。 还 等 什么 呢 ? 让 我 们 精神 倍增 地 学 习 后 
面 的 精彩 内 容 吧 | 
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中 的 内 部 DSL 设 计 





本 章 内 容 

口 利用 鸭子 类 型 和 元 编程 使 DSL 更 简 少 

O 用 Ruby 语 言 实现 交易 处 理 DSL 

O 用 Groovy 语 言 改进 之 前 的 指令 处 理 DSL 

口 用 Clojure 语 言 转换 思路 重新 实现 交易 处 理 DSL 
口 一 些 实现 语言 的 第 见 隐 阱 














学 习 新 范式 和 新 设计 手段 的 最 佳 途径 , 是 找到 最 能 体现 该 范式 特点 的 语言 ， 观 察 语言 和 范式 
在 真实 的 实现 案例 中 的 表现 。 第 4 章 我 们 谈 了 不 少 有 利于 提高 内 部 DSL 表 现 力 的 惯用 法 和 模式 。 
本 章 我 挑选 了 三 种 目前 最 流行 的 JVM 请 言 ， 回 你 示范 如 何 用 它们 建立 符合 现实 需要 的 DSL。 

本 章 将 按照 图 5$-1 所 示 内 容 展开 讨论 。 














适合 用 于 实现 内 部 DSL 的 需要 注意 的 
各 种 动态 类 型 语言 的 特性 一 些 陷阱 
一 种 用 Ruby 语 言 一 种 用 Clojure 语 言 
实现 的 内 部 DSL 实现 的 内 部 DSL 
用 Groovy 语 言 改 进 之 
前 的 指令 处 理 DSL 


图 5-1 KERRE 





本 章 选 择 的 语言 都 是 动态 类 型 语言 。 我 首先 会 说 明 动 态 类 型 语言 拥有 哪些 特质 能 造就 优秀 的 
DSL, 其 次 解释 为 何 选 择 Ruby、Groovy、Clojure 这 三 种 语言 来 展开 讨论 。 然后 我 们 进入 实现 环节 ， 
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依次 引导 你 用 这 三 种 语言 分 别 实现 一 个 完整 的 DSL。 这 期 间 我 们 会 讨论 每 种 语言 中 常用 于 DSL 设 
计 的 主要 特性 ， 同 时 介绍 选取 正确 实现 模式 的 知 干 原则 和 思路 。 

阅读 完 本 草 ， 你 对 于 如 何在 具有 类 似 特性 的 语言 中 开展 DSL 设 计 工 作 将 有 一 个 全 面 的 认识 。 
经 过 多 个 完整 的 DSL 实 现 过 程 ， 你 将 学 会 从 目标 DSL 的 角度 去 思考 ， 学 会 按照 设计 和 意图 把 实现 语 
言 编排 成 你 布 望 提供 给 用 户 的 DSL 语 法 。 

本 章 涉 及 大 量 编程 实践 。 请 你 把 相应 语言 的 解释 闪 都 找 出 来 ,准备 好 迎接 大 量 人 代码。 我们 的 
例子 都 比较 简短 明了 ,保证 不 会 让 你 大 烦 。 本 书 附 录 为 三 种 语言 都 准备 了 简单 的 复习 资料 ， 如 来 
你 对 哪 种 语言 不 太 熟 悉 ， 不 妨 翻 看 一 下 作为 热身 。 如 果 你 对 多 博 开 发 ， 即 同时 使 用 多 种 语言 进行 
开发 的 概念 感到 阳 和 后， 附录 G 可 以 作为 入 门 介 绍 。 下 面 我 们 就 从 选择 这 三 种 语言 的 理由 说 起 。 


5.1 动态 类 型 成 就 简洁 的 DSL 


内 部 DSL 将 领域 语义 呈现 为 更 易 读 的 形式 , 这 是 内 部 DSL 在 实现 语言 上 面 增加 的 一 种 重要 性 
内 部 DSL 用 领域 用 户 能 明白 的 语句 、 语 让 站 用 户 解 释 实 现 的 含义 。 












































当 没 有 程序 员 背 景 的 领域 专家 阅读 一 段 DSL 脚 本 时 ， 他 应 该 能 够 读 懂 其 中 的 领域 
i JL). 85553518 7L A dp HARALA BDa]73i8iE:8, DSL AEM. 我 
不 鼓吹 让 每 个 非 程 序 员 背景 的 领域 专家 都 能 用 DSL 编 写 程序 , 但 至 少 应 该 做 到 让 领域 专 
家 能 够 理解 DSL 脚 本 中 的 领域 语义 。 


动态 类 型 语言 写成 的 程序 不 带 类 型 标注 , 这 本 身 就 减少 了 视觉 上 的 干扰 ,可 以 更 清楚 地 说 明 
编程 者 的 意图 。 这 样 写 出 来 的 代码 可 读 性 较 好 ， 而 易 读 性 正 是 DSL 区 别 于 一 般 API 的 基本 特质 之 
一 。 我 会 用 下 面 儿 节 说 明 用 动态 类 型 语言 开发 出 来 的 DSL 所 具备 的 三 大 重要 特质 : 

口 更 易 读 ， 因 为 没有 类 型 标注 的 干扰 (5.1.17 ); 

Q 鸭子 类 型 ， 涉 及 DSL 接 口 契 约 的 设计 思路 (5.1.2755 ); 

O 元 编程 ， 从 DSL 实 现 中 清除 死板 代码 的 一 种 方式 (5.1.3 节 )。 














51.1 吻 读 


DSL 的 读者 都 希望 语言 目 然 流畅 , 不 愿意 其 中 掺 入 不 必要 的 复杂 内 容 。 编 程 语言 的 类 型 系统 
有 可 能 助长 DSL 的 非 本 质 复 杂 性 。 如 采 你 用 了 一 种 类 型 系统 像 Java 那 么 琐 细 的 实现 语言 ， 很 可 能 
最 后 出 来 的 DSL 要 在 抽象 身上 附加 一 串 不 必要 的 类 型 标注 。 动 态 类 型 请 言 不 要 求 提 供 类 型 标注 ， 
所 以 相 比 同等 情况 下 的 静态 类 型 霹 言 实现 ,能 更 清 权 地 表达 编程 者 的 意图 。 至 于 意图 背后 的 实现 ， 
倒 不 一 定 更 容易 理解 。( 5.5 和 将 讨论 基于 动态 霹 言 的 DSL 实 现 中 的 向 见 陷阱 ， 届 时 你 会 看 到 这 方 
面 的 例子 。) 总 体 而 言 ， 动 态 类 型 语言 的 语法 较为 人 简明， 制作 出 来 的 DSL 及 其 实现 也 因此 较为 
Zi. 

DSL 是 否 易 读 可 以 直观 地 感受 出 来 ,不 过 动态 语言 还 有 男 一 个 特点 ,同样 在 内 部 DSL 的 设计 
和 实现 中 扮演 了 重要 角色 。 动态 类 型 语言 轻 仪 廊 而 重 语 义 。 EN ERSRI HH BETHMR. 虽然 
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表现 出 来 的 还 是 抽象 组 成 的 层次 结构 , 但 背后 的 思维 是 不 同 的 。 不 同 的 地 方 在 于 抽象 如 何 啊 应 发 
送 给 它 的 消 县 。 


5.1.2 REF 


机 子 类 型 不 一 定 是 弱 类 型 。 假 设 你 在 一 个 对 象 上 调用 某 消 息 , 如 果 该 对 象 满足 消息 所 要 求 的 
契约 ， 就 会 得 到 啊 应 ; 否则 ， 消 息 将 油 厦 该 对 象 的 继承 链 回 上 传播 ， 下 至 找到 一 个 祖先 对 象 满足 
消息 契约 为 止 。 如 条 一 下 上 漳 到 根 对 象 都 找 不 到 合适 的 方法 来 啊 应 该 消息 ， 用 户 将 得 到 一 个 
NoMethodqErzror。 编 译 时 并 不 确定 在 这 个 对 象 上 调用 那 则 消息 是 否 有 效 ， 因 为 不 存在 这 方面 的 
静态 检查 。 但 用 户 可 以 在 运行 时 修改 对 象 的 啊 应 目标 , 改变 其 方法 和 属性 。 对 于 任意 给 定 的 消息 ， 
如 条 在 消息 被 调用 的 那 一 刻 ， 目 标 对 象 文 持 该 消息 ,那么 就 认为 调用 是 有 效 的 。 这 个 机 制 称 为 鸭 
子 类 型 ( duck typing )，Ruby、Groovy、Clojure 等 众多 语言 都 实现 了 这 各 机制。 静态 类 型 语言 如 
Scala， 也 可 以 实现 鸭子 类 型 ， 我 们 将 在 第 6 音 论 及 。 

1. 通过 鸭子 类 型 实现 的 多 态 

动态 语言 中 的 鸭子 类 型 对 于 我 们 实现 DSL 有 什么 好 处 呢 ? 简单 来 说 还 是 那 句 话 , 我 们 牺牲 静 
人 态 类 型 安全 换取 简洁 的 实现 。 你 不 需要 议 态 地 声明 接口 ,也 不 需要 依赖 继承 关系 去 实现 多 态 。 只 
要 消息 的 接收 者 实现 了 正确 的 契约 ， 它 就 可 以 合理 地 啊 应 消息 。 岁 $-2 摘 绘 了 通过 了 鸭子 类 型 来 实 
现 多 态 的 情形 。 






































Food Bar 抽 象 






Wi quack () 响应 quack () 





qs = [new Foo(), new Bar()] 
for (q in qs) { 
q.quack() 






) 





图 5-2 ”鸭子 类 型 构成 的 多 态 。Foo 和 Baz 抽 象 并 没有 任何 共同 的 基 类 ， 但 在 文 持 鸭子 
类 型 的 语言 里 ， 可 以 把 它们 看 作 是 多 态 的 
接 下 来 我 们 看 一 个 金融 交易 领域 的 例子 。 我 们 首先 做 一 个 用 了 接口 的 Java 实 现 ， 然后 做 一 个 
用 了 蝎子 类 型 的 Ruby 实 现 ， 让 你 在 对 比 之 下 体会 后 者 的 简洁 。 
2. 金融 交易 领域 的 例子 
交易 所 里 履行 的 交易 有 许多 类 型 ， 类 型 的 划分 与 被 交 易 的 聚 据 种 类 有 关 。( 交易 、 采 据 、 成 
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交 这 些 概念 你 应 该 已 经 熟悉 了 ,万 一 有 所 遗忘 ， 请 翻 查 前 面 几 章 的 插入 栏 。) 证 券 交 易 是 涉及 股 
RARER, INEX HRABI (spot) 或 挥 期 (swap) 交易 的 形式 交换 各 种 外 国货 
Ih. 一般 地 ， 在 Java 这 样 的 静态 类 型 语言 里 面 ， 你 会 将 这 两 个 概念 建 模 为 同一 接口 下 的 两 个 特殊 
化 抽象 。 继 承 链 的 定义 也 是 静态 的 ， 如 下 面 的 代码 片段 所 示 : 
interface Trade { 
float valueOf(); 
j 
class SecurityTrade implements Trade { 
public float valueOf() { //.. ) 
j 
class ForexTrade implements Trade { 


public float valueOf() { //.. ) 
j 


如 采 有 一 个 计算 交易 现金 价值 的 方法 ,要求 可 以 传递 给 它 任意 类 型 的 rraaqe 对 象 ,那么 实现 
出 来 会 是 这 个 样子 : 
public float cashValue(Trade trade) ( 
trade.valueOf(); 
cashValue 方 法 的 参数 被 限定 为 实现 了 valueof 方 法 的 最 高 一 级 静态 类 型 。 这 项 约束 由 Java 
编 详 天 静态 地 核查 。 作 为 对 比 ， 请 你 看 另 一 个 实现 ， 下 面 的 代码 清单 用 了 鸭子 类 型 来 实现 


cash_value 方 法 。 


代码 清单 5-1 ”鸭子 类 型 构成 的 多 态 
class SecurityTrade 
## .. 
def value of 
## .. 
end 





end 


class ForexTrade 
du .. 
def value of 
dH .. 
end 
end 


def cash value (trade) 
trade.value of 


end 
cash value(SecurityTrade.new) 


cash value(ForexTrade.new) 

这 个 实现 没有 前 面 那些 周边 设施 ， 不 存在 静态 继承 关系 ; 只 要 传递 的 对 象 实现 了 value_of 
方法 ， cash_value 就 能 执行 无 误 。 假 如 传递 一 个 没有 实现 value_of 方 法 的 无 关 对 象 ， 会 怎么 
样 呢 ? 坚 无 疑问 ，cash_value 会 在 运行 时 卡 壳 。 所 以 你 应 该 有 全 面 的 单元 测试 去 核查 保护 各 处 
契约 。 
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单元 测试 时 , 由 于 不 需要 穷 于 应 付 静 态 类 型 的 安全 , 很 容易 构建 用 于 测试 的 模拟 对 象 。 记 住 ， 
在 一 种 文 持 鸭子 类 型 的 语言 里 面 , 不 要 去 检查 类 型 ， 也 不 要 试图 用 动态 语言 来 模拟 静态 类 型 。 这 
是 一 种 截然 不 同 的 抽象 设计 思路 。 抽 和 象 有 没有 实现 它 应 该 向 客户 提供 的 契约 , 这 才 是 你 的 测试 套 
件 所 要 针对 的 目标 。 

网 子 类 型 令 你 无 需 写 出 静态 的 约束 检查 代码 。 仪 仪 这 一 条 就 立即 让 DSL 实 现 简 洁 了 许多 , 同 
时 编写 者 的 意图 也 表达 得 很 清晰 。 我 们 在 4.2.2 六 ， 在 Ruby 中 通过 动态 mixin 实 现 猴 饰 本 的 时 候 已 
经 讨论 过 这 一 点 。 最 后 得 到 的 DSL 如 下 所 示 : 

Trade.new('r-123', 'a-123', 'i-123', 20000) .with TaxFee, Commission 

注意 , 我 们 向 Trade 抽 和 象 里 混入 TaxFee 和 Commission 两 个 模块 ,交易 的 总 现金 价值 通过 
Ruby 的 觅 子 类 型 计算 得 出 。 

接 看 我 们 要 与 第 4 章 认识 的 元 编程 技术 再 次 碰面 。 动 态 类 型 语言 用 元 编程 技术 可 以 把 你 从 重 
复 性 的 死板 代码 中 解放 出 来 。 


5.1.3 ”元 编程 一 一 又 础 面 了 


除了 省 去 类 型 标注 外 , 动态 类 型 还 有 什么 办 法 令 DSL 语 言 更 简洁 ?” 答案 我 们 在 上 一 草 就 知道 
T, 它 可 以 通过 语言 本 里 的 机 制 生成 重复 性 的 代码 结构 ， 人 免除 手工 编写 的 负担 。 人 简洁 的 实现 对 于 
DSL 的 设计 者 很 重要 ， 而 简洁 的 DSL 编 程 界面 对 于 DSL 的 使 用 者 同样 重要 。Ruby 和 Groovy 都 拥有 
非常 精 民 的 元 编程 设施 ， 可 以 在 运行 时 引入 新 的 方法 和 属性 ,我们 已 经 在 2.3.1 六 和 4.2 人 讨论 过 。 
举 一 个 例子 来 回顾 动态 类 型 对 于 DSL 实 现 简 清 性 的 正面 影响 吧 。 下 面 的 代码 清单 用 Groovy 霹 言 演 
示 了 一 个 运用 元 编程 和 闭 包 来 实现 的 XML 建造 右 。 


代码 清单 5-2”Groovy 语 言 实现 的 XML 建造 希 ， 展 示 动 态 元 编程 的 力量 


def clientOrders = //.. 
builder = new groovy.xml.MarkupBuilder() 






































builder.orders ( 
clientOrders.each (ord -> 
order (type: ord.getbuyselli(i)) i 
instrument (ord.getSecurity()) P Groovy 的 动态 方法 分 发 
quantity(ord.getQuantityvy()) 
price(ord.getLimitPrice()) 
j 
j 
} 


例 中 Groovy 语 言 实现 的 MarkupBuilder 对 于 order、instrument、quantity、price 等 
方法 一 无 所 知 @。 语 言 运 行 时 通过 Groovy 的 动态 方法 分 发 机 制 以 及 methodqMissing() 钧 子 ， 拦 
截 所 有 未 定义 的 方法 调用 .Ruby 语言 也 有 类 似 的 手法 。 动 态 类 型 语言 提供 了 拦截 器 来 应 付 所 有 未 
定义 的 方法 。 这 样 的 技巧 使 程序 更 简洁 、 更 动态 ， 同 时 又 能 保留 必要 的 表现 力 。 

我 们 分 析 了 动态 语言 实现 的 DSL 的 三 项 代表 性 特质 。 第 一 项 易 读 性 说 的 是 DSL 脚 本 的 表面 语 
ik; 另外 两 项 ， 了 鸭子 类 型 和 元 编程 则 更 多 地 与 实现 技术 有 关 。 我 们 试 着 列举 一 下 Ruby、Groovy、 
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Clojure 语 言 各 具备 哪些 特性 ， 有 利于 创作 表现 力 充沛 的 DSL 。 


5.1.4 为何 选 择 Ruby、Groovy、Clojure 


Ruby、Groovy 、Clojure 三 种 语言 都 完全 具备 前 述 动态 类 型 语言 的 三 大 特质 ， 它 们 都 是 适合 
实现 内 部 DSL 的 优秀 箱 主 语言 。 表 5-1 总 结 了 它们 的 语言 特性 。 


表 5-1 Ruby、Groovy 和 Clojure 语 言 具备 以 下 特质 ， 使 它们 成 为 内 部 DSL 实 现 语 言 的 优秀 候选 者 








E im 性 鸭子 类 型 元 编 E 
Ruby 语法 灵活 ， 无 需 类 型 标 广 ， 文 字 表 达 “支持 鸭子 类 型 ， 且 可 用 具有 很 强 的 反射 式 和 生成 式 元 
手段 丰富 responds_to? 检 查 一 个 类 编程 能 力 





是 否 啊 应 给 定 的 消息 
Groovy 语法 灵活 ， 类 型 标注 可 选 ， 文 字 表达 — 文 持 鸭子 类 型 ; 允许 无 公共 “运行 时 元 编程 能 力 强 ， 通 过 














手段 丰富 基 类 的 多 态 Groovy 元 对 象 协议 (MOP ) 实现 
Clojure 语法 灵活 ， 但 作为 Lisp 的 变 体 ， 为 前 ”如 同 Ruby 或 Groovy, 也 支持 可 经 由 安 机 制 实现 编译 时 元 编 

组 语法 形式 所 限 。 人 允许 程序 员 提 供 可 “鸭子 类 型 程 。Clojure 拥 有 极 强 的 可 塑性 ， 

选 的 类 型 提示 (type hint ) 以 利 方法 分 可 视 DSL 之 需 灵 活 扩展 


发 ， 可 避免 像 Java 那 样 的 反射 式 调用 


虽然 Ruby、Groovy、Clojure 有 一 些 共 同 的 特点 ,但 它们 在 DSL 实 现 方面 的 差别 其 实 也 很 大 ， 
足以 使 我 们 分 成 三 节 来 分 别 讨论 。 这 三 种 语言 都 在 JVM 上 运行 , 都 拥有 很 强 的 元 编程 能 力 ， 也 都 5 
迅速 成 为 了 主流 的 开发 语言 。 然 而 就 在 与 JVM 集 成 的 方式 这 个 很 基本 的 问题 上 , 它们 却 给 出 了 不 
一 样 的 答案 。 图 5-3 总 结 了 这 三 种 语言 的 一 些 异 同 。 




















JRuby Groovy Clojure 





运行 在 IJVM 上 X ^ à 
动态 类 型 x x x 
运行 时 元 编程 x x 
编译 时 元 编程 

? ? X 


共享 Java 的 对 象 系统 


桥接 Java 的 对 象 系统 X 


? . 通过 操纵 AST 的 库 提供 有 限 支持 


图 $-3 Ruby, Groovy, 、Clojure 呈 现 了 多 样 化 的 DSL 实 现 方案 
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本 革 我 们 将 分 别 用 这 三 种 语言 探索 内 部 DSL 的 实现 。 在 讨论 过 程 中 ,我们 将 观察 每 一 种 语言 
的 不 同 特性 ， 同 时 剂 析 每 项 特性 在 第 4 章 深 入 讨论 过 的 那些 模式 中 所 起 的 作用 。 








5.2 Ruby 语言 实现 的 交易 处 理 DSL 


本 节 我 们 要 开发 一 个 完整 的 用 例 。 我 们 要 设计 一 种 DSL 用 于 建立 新 的 证 券 交 易 ， 并 根据 可 灵 
活 组 合 的 业务 规则 计算 交易 的 现金 价值 。DSL 执 行 之 后 ， 将 产生 一 个 Trade 抽 象 的 实例 供应 用 程 
序 使 用 ,具体 用 法 因应 用 而 异 。 我 们 会 从 一 个 简单 的 实现 开始 并 逐步 进行 改进 ,充实 其 表现 力 和 
领域 内 涵 。 图 5-4 展 示 了 DSL 演 进 的 迭代 路 线 图 。 








从 用 Ruby 实 现 T€ 
基本 的 API 开 始 e OTRE 
S i 。 隐 式 上 下 文 
e 基本 的 元 编程 
建立 一 个 加 强 的 
Instrument 模 型 
e 猴子 补丁 
设立 一 个 解释 器 。 进一步 元 编程 
。 正 则 表达 式 处 理 
。 动态 方法 调用 
以 装饰 器 方式 
加 入 领域 规则 


e 动态 mixin 组 合子 


图 $-4 ”我 们 逐步 丰富 Ruby DSEL 的 实现 手段 ， 完 善 交 易 处 理 DSL。 每 个 阶段 我 们 都 投 
和 人 更 多 Ruby 语 言 的 抽象 能 力 ， 增 加 更 多 领域 功能 ， 用 以 充实 DSL 


在 整个 开发 过 程 中 ， 老 鲍 会 担当 我 们 的 指导 ,人 负 贡 指出 所 有 不 当 之 处 和 需要 改进 的 地 方 ， 
带 助 我 们 打造 一 个 表现 力 充沛 的 DSL 设 计 。 至 于 能 不 能 满足 老 饮 的 要 求 ， 就 要 看 Ruby 玫 不 玫 
Lre 





代码 提示 后 面 几 节 含 有 大 量 代 码 片 段 ， 我 会 插入 说 明 一 些 预备 知识 ， 解 释 必 要 的 语言 特性 ， 
以 便 读 者 理解 实现 中 的 细微 之 处 .阅读 之 前 也 不 妨 先 翻 看 本 书 附 录 中 相应 语言 的 速 查 
表格 。 


请 牢记 我 们 的 目标 : DSL 要 让 老 鲍 能 看 懂 ， 并 且 能 检查 DSL 是 否 违反 了 他 的 业务 规则 。 
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5.2.1 从 API 开 始 


最 开始 的 API 设 计 总 是 略 显 粗糙 的 。 动 态 域 言 的 开发 历程 加 像 制 陶 一 样 ， 你 总 是 从 一 团 秋 十 
开始 ， 然 后 有 步骤 地 塑造 其 形态 ， 逐 渐 增 加 其 表现 力 。 








年 Ruby 知识 点 

口 Ruby 中 如 何 定义 类 和 对 象 ? Ruby 是 一 种 面向 对 象 语 言 ， 类 的 定义 形式 与 其 他 OO 语言 相 
仿 。Ruby 有 其 特殊 的 对 象 模型 ,允许 你 在 运行 时 通过 元 编程 机 制 修改 、 调 查 、 扩 展 对 象 。 

O 如 何 使 用 散 列 容器 实现 不 定 长 的 参数 列表 ? Ruby 语 言 允 许 你 向 方法 传递 一 个 散 列 容器 
作为 参数 ， 以 此 来 模拟 “关键 字 参 数 ”( keyword arguments ) 的 特性 。 

O Ruby 元 编程 基础 知识 。Ruby 的 对 象 模型 包含 许多 可 以 用 于 反射 式 和 生成 式 元 编程 的 元 
件 材 料 ， 例 如 类 、 对 得、 实例 方法 、 类 方法 、 单 例 (singleton) 方法 ， 等 等 。Ruby 元 编 
程 机 制 允许 你 在 运行 时 探查 其 对 象 模 型 ， 也 允许 动态 地 改变 行为 或 生成 代码 。 





请 思考 以 下 代码 片段 ， 这 是 我 们 的 API 没 计 师 想 出 来 的 第 一 版 DSL: 


instrument = Instrument.new ('Google') 
instrument.quantity = 100 将 被 交易 的 新 票据 


TradeDSL.new.new trade 'T-12435', 
'acc-123', :buy, instrument, 
'unitprice' => 200, 

'principal' => 120000, 'tax' => 5000 


EWI Y JR UKHWEBSE E: "NE! 这 个 东西 太 技术 了 。 我 想 要 一 个 票据 对 象 还 得 调用 那 一 
串 奇 怪 的 构造 ?我 平津 可 不 是 这 么 解读 交易 和 票据 的 。” 

老 鲍 的 话 有 道理 ,我 等 一 下 再 解释 。 你 先 跟 我 复 译 一 按 : DSL 绝 不 会 第 一 次 就 做 对 。DSL 总 
是 迭代 演进 的 。 上 面 的 片段 只 是 一 套 中 规 中 和 矩 的 API， 其 多 读 性 只 达到 Ruby 的 一 般 水 平 。 它 还 没 
有 形成 连贯 的 句子 , 读 起 来 不 像 老 鲍 平 肖 处 理 交 易 业 务 时 挂 在 口 边 的 话语 。 不 过 ,这 段 代码 给 我 
们 更 定 了 一 点 基础 ， 可 以 作为 我 们 的 出 发 点 。 

1. 基本 抽象 

任何 DSL 设 计 都 是 从 一 组 基本 抽象 开始 , 然后 在 上 面 建 立 符 合 领域 习惯 的 语言 。 这 样 的 过 程 我 
们 称 为 目 底 回 上 的 编程 方式 ， 大 的 抽象 由 小 的 抽象 生长 而 成 ， 最 后 形成 领域 专家 想 要 的 表现 形态 。 

我 们 的 DSL 设 计 从 针对 securityTrade、Instrument 等 基本 领域 实体 的 一 组 API 开 始 。 下 
面 的 Ruby 代 码 清单 是 API 对 应 的 一 些 基本 抽象 。 


«A 
将 被 创建 的 交易 





























代码 清单 5-3 SecurityTrade 的 Ruby 实 现 〈 第 一 次 友 代 ) 
class SecurityTrade 
attr reader rrei no; 
:account, 


:buy sell, 
instrument, 
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:unitprice 


attr accessor :principal, 
: tax, 
: commission 


def initialize(ref no, account, buy sell, instrument, unitprice) 
GQref no = ref no 
Qaccount, Gbuy sell, Ginstrument, QGunitprice = 
account, buy sell, instrument, unitprice 


end 9 用 于 创建 交易 的 类 方法 
def self.create(ref no, account, buy sell, instrument, h) 
tr = new(ref no, account, buy sell, instrument, h['unitprice']) 
[:principal, :tax, :commission].each do |m| 
tr.instance eval ("tr.#{m} = h['#{m}'] if h.has key?('#{m}')") 
end 
a 填 入 来 自 散 列 容器 的 什 
end 
end 








create 类 方法 里 面 的 h 是 个 散 列 容器 各 , 用 来 给 unitprice、principal 和 tax 提 供 命 名 参 











数 。 用 散 列 容器 来 实现 命名 参数 是 Ruby 的 一 种 惯用 法 。 位置 @ 还 采用 了 一 种 有 意思 的 技巧 ， 即 利 
用 元 编程 建立 被 调用 对 象 的 隐 式 上 下 文 ， 并 用 散 列 容 右 h 中 取出 的 各 参数 值 填充 交易 对 和 象 实例 。 
我 们 在 4.2.1 节 讨论 过 如 何 建立 隐 式 上 下 文 。 





代码 清单 5-4 实 现 了 Instrument 类 。 这 个 类 没有 写成 不 可 变 的 形式 , 除 此 之 外 没什么 特别 值得 





注意 的 地 方 。 丈 当前 版 本 的 DSL 而 言 , 我们 可 以 把 它 写 成 不 可 变 的 值 对 象 。 但 之 所 以 保留 为 可 变 的 
对 象 ， 到 下 一 市 你 就 能 清楚 知道 其 理由 ， 到 时 候 我 们 要 利用 它 的 可 变性 来 创造 一 种 涌 据 DSL。 





代码 清单 5-4 在 Ruby 中 实现 Instrument 交 易 


class Instrument 


attr accessor :name, :quantity 
def initialize(name) 
@name = name 
end 
def to_s() 
" (Name: " + @name.to_s + 
"/Quantity: " + Gquantity.to s -BonU)"U 
end 


end 
本 节 代 码 缺 少 的 最 后 模块 是 rradqeDpsL 类 ， 它 只 负责 把 前 面 的 材料 串 在 一 起 : 


require 'security trade' 
class TradeDSL 
def new trade(ref no, account, buy sell, instrument, attributes) 
SecurityTrade.create(ref no, account, buy sell, instrument, attributes) 
end 





end 


我 们 的 DSL 迈 出 了 第 一 步 。 你 会 在 后 续 的 迭代 中 观察 到 enter code hereTradeDSL 的 成 长 


过 程 ， 它 的 表现 力 会 越 来 越 强 ， 我 们 也 会 逐步 加 入 更 多 的 功能 。 
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2. DSL 门面 

TradeDSL 类 演示 了 一 种 让 DSL 语 法 与 底层 实现 解 厢 的 重要 手法 。 一 方面 ， 这 个 类 癌 用 户 呈 
现 DSL 表 面 语法 ; 男 一 方面 ， 它 把 基本 抽象 包装 起 来 ， 在 实现 之 上 插入 一 个 间接 层 。 图 5-5 形 象 
地 描绘 了 DSL 的 这 种 结构 。 


| 在 基本 抽象 的 基础 


提供 核心 实现 














基本 抽象 








K[5-5s _DSEL 门 面 既 问 用 户 提供 表现 力 充 沛 的 API， 又 保护 核心 实现 结构 不 被 暴露 


切记 ， 在 设计 DSL 时 ， 一 定 只 回 用 户 提 供 单一 的 交互 点 。 本 例 中 TradeDSL 类 担当 了 DSEL 门 
1 fft. 目前 这 个 门面 仪 包装 securityTrade 类 的 create 方 法 ， 我 们 将 在 后 续 的 迭代 中 持续 
地 充实 、 完 善 这 个 抽象 ,使 它 能 够 满足 用 户 的 需求 。 现 在 最 紧迫 的 任务 是 解决 老 鲍 对 DSL 中 创建 
票据 部 分 的 不 满 。 这 种 时 候 来 点 不 按 和 常规 的 办 法 反而 管用 。 


5.2.2 RART NT 


TradeDSL 类 的 下 一 步 进化 目标 是 让 老 鲍 更 轻松 地 创建 票据 。 他 想 按照 平常 在 交易 全 前 的 习 
惯 那样 ， 购 买 100 股 IBM 的 股票 。 下 面 是 一 段 创建 交易 的 DSL， 里 面 说 明了 被 交易 的 票据 详情 ， 
我 们 就 希望 能 把 脚本 写成 这 个 样子 。 

TradeDSL.new.new trade 'T-12435', 


'acc-123', :buy, 100.shares.of('IBM'), 
'unitprice' => 200, 'principal' s» 120000, 'tax' => 3000 


之 前 那些 老 饮 看 不 懂 的 多 余 句 法 结构 不 见 了 ， 他 可 以 用 平常 习惯 的 语言 来 设立 票据 : 
100.shares.of('IBM'). ZRI E! 那么 我 们 费 了 哪些 功夫 才 得 到 这 样 的 脚本 呢 ? 


























E 
E ”Ruby 知 识 点 

猴子 补丁 ( monkey patching ) 指 在 已 有 的 类 中 加 入 新 的 属性 或 方法 。Ruby 允 许 打 开 一 个 
已 经 存在 的 类 ， 引 入 新 的 方法 和 属性 来 扩 增 类 的 行为 。 这 项 特性 极为 强大 ,强大 到 你 可 能 会 不 


HOA S 
TEM SY. 
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代 人 码 清 单 5-5 实 现 了 shares 和 of 两 个 方法 ,我 们 不 动 声 色 地 把 它们 引入 到 Numeric 类 。 
Numeric 是 Ruby 语 言 内 建 的 类 ， 任何 Ruby 类 都 可 以 被 打开 并 引入 新 的 属性 和 方法 。 这 样 的 做 法 
称 为 猴子 补丁 ( monkey patching )。 很 多 批评 者 认为 不 应 该 豆 励 使 用 这 种 特性 ， 因 为 猴子 补丁 威 
力 太 大 ， 使 用 的 时 候 不 得 不 注意 其 风险 和 陷阱 。 任 何 一 本 正经 的 Ruby 教 科 书 〈5.7 玉 文献 [1] ) 都 
会 警告 你 不 要 过 度 人 使用。 其实， 只 要 谨慎 使 用 ， 狐 子 补 丁 可 以 给 DSL 插 上 翅膀 。 


代码 清单 5-5 ”使 用 了 猴子 补丁 的 票据 DSL 








require 'instrument' F 打开 Numeric 类 
class Numeric 
def shares 
self e 新 方法 shares 
end 


alias :share :shares 


def of instrument 

if instrument.kind of? String P 新 方法 of 
instrument = Instrument.new(instrument) 

end 
instrument.quantity - self 
instrument 

end 

end 


写 完 这 段 代码 ， 交 易 DSL 的 第 一 次 选 代 就 告 一 段落 。 随 着 核心 抽象 的 各 部 分 逐渐 延伸 融合 ， 
我 们 DSL 的 表现 力也 越 来 越 强 。5.2.1 节 开头 那 段 代码 在 创建 票据 时 伴随 的 干扰 现在 已 经 被 清理 
掉 。 不 过 与 老 鲍 想 要 的 自然 语言 表达 相 比 , 我 们 的 实现 还 存在 不 少 句法 怪异 的 地 方 。 Ruby 有 办 法 
帮 我 们 更 进一步 ， 而 且 我 们 的 rzadeDsz 门 面 也 经 得 起 折腾 。 下 一 节 我 们 会 用 一 点 语法 糖衣 将 它 
装点 起 来 ， 打 扮 成 老 鲍 满意 的 DSL。 








5.2.3 ”设立 DSL 解 释 器 


表现 力 要 多 强 才 算 足够 ? 这 个 问题 没有 固定 的 答案 , 因 DSL 用 户 的 立场 而 寞 。 对 于 熟悉 Ruby 
的 程序 员 来 说 ,第 一 次 迭代 的 DSL 表 现 力 已 经 足够 。 即 使 是 不 懂 编 程 的 领域 专家 ,也 大 体 知道 写 
的 是 什么 ， 只 不 过 有 些 多 出 来 的 句法 结构 看 起 来 可 能 不 太 舒 服 而 已 。 因 为 精益 求 精 , 也 因为 Ruby 
语言 有 这 样 的 能 力 ， 所 以 我 们 可 以 把 DSL 做 得 更 完美 一 些 ， 更 接近 老 鲍 在 交易 台 前 所 说 的 请 言 。 














1 Ruby 知 识 点 
口 如 何 利 用 Ruby 的 “嵌入 文档 ”( here documents ) 特性 定义 多 行 字符 串 。 通 过 这 个 技 
巧 ， 可 在 源 代码 中 直接 定义 一 段 文 本 ,而 不 必 另 行 写 到 代码 外 部 。 
口 如 何 定 义 类 方法 。 类 方法 (或 单 例 方法 ) 是 Ruby 单 例 类 (singleton class ) 的 实例 方法 。 
详情 请 查阅 5.7 节 文献 [1]。 
D evals 的 一 般 用 法 及 其 元 编程 用 途 。 在 运行 时 动态 地 求解 一 事 或 一 段 内 含 代 码 的 字符 ， 
是 Ruby 最 强大 的 特性 之 一 。Ruby 的 evals 有 好 几 种 形态 ,适用 于 不 同 的 上 下 文 。 
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口 Ruby 正 则 表达 式 的 处 理 。 Ruby 内 置 支持 正则 表达 式 ， 对 模式 匹配 和 文本 处 理 有 极 大 的 
帮助 。 


1. 加 入 解释 器 
我 们 在 5.2.2 市 已 经 为 TradeDsL 开 发 了 相当 有 表现 力 的 说法 ,能 出 色 地 反映 领域 语义 。 不 过 
对 老 鲍 来 说 ， 还 是 拉 术 味 太 浓 了 一 点 ， 他 习惯 于 说 更 流畅 的 交易 语言 。 
第 二 次 迭代 我 们 准备 推出 一 个 解释 天 来 翻译 老 鲍 的 语言 , 把 他 的 话 去 区 存 普 ,提取 构建 抽象 
所 需 的 必要 信息 。 本 次 迭代 完成 之 后 ，DSL 脚 本 看 起 来 应 该 是 这 个 样子 : 
Str = ««END OF STRING 
new trade '"T-12435' for account 'acc-123! 


to buy 100 shares of 'IBM', 
at UnitPrice=100, Princeipalsl12000, Taxs500 











END OF STRING 

puts TradeDSL.trade str 

DSL 的 核心 抽象 上 一 次 迭代 时 就 已 经 准备 就 绪 ， 我 们 现在 开始 动手 制作 语法 糖衣 。 我们 的 交 
易 处 理 语 言 正 按照 计划 稳步 前 进 。 

要 让 代码 变 成 上 面 的 样子 ,我们 需要 往 TradeDsi 类 里 加 些 什么 东西 呢 ?”5.2.2 节 打造 的 门面 
TradeDSL， 经 过 第 二 次 友 代 变 成 代码 清单 5-6 的 样子 。 类 中 设立 了 一 个 小 小 的 解释 天， 负责 将 用 
户 输入 处 理 之 后 再 传递 给 Securi tyTrades 


代码 清单 5-6  fERuby' TE 575 DSLABUNAEEEE SR HUE T (BRER ) 


require 'security trade' 








require 'numeric' 


class TradeDSL 
class << self 9 拦截 未 定义 的 常量 
def const missing(sym) 
sym.to s.downcase 
end 
def trade(str) 
TradeDSL.new.interpret(str) 
end 
end 


def new trade(ref no, account, buy sell, instrument, attributes) 
SecurityTrade.create(ref no, account, buy sell, instrument, attributes) 


end 
def interpret(input) 9 提供 隐 式 上 下 文 给 new_trade 
instance eval parse(input) 


pus 9 处 理 用 户 输入 


def parse(dsl string) 
dsl = dsl string.clone 
ds1.gsub! (/=/, '=>') 
dsl.sub!(/and /, '') 
dsl.sub!(/at /, '') 
dsl.subli(/for account /, ',') 





118 $53 Ruby, Groovy, Clojure 语言 中 的 内 部 DSL 设计 


dsl.sub!(/to buy /, ', :buy, ') 
dsl.sub!(/(Nd-) shares of ('.*?')/, '\l.shares.of(\2)') 
dsl.sub!(/(Nd-) share of ('.*?')/, 'Mi.shares.of(M2)') 
puts dsl 
dsl 

end 


end 
与 其 下 接 解 释 每 一 行 代 码 做 了 什么 ， 不 如 先 看 一 幅 示 意图 。 图 5-6 描 绘 了 老 鲍 的 语言 锌 解释 
的 全 部 步 又。 





new trade 'T-12435' for account 'acc-123' 
语法 分 析 => to buy 100 shares of 'IBM', 
at UnitPrice-100, Principal-12000, Tax-500 


(转换 为 一 次 方法 调用 ) 


instance_eval 提 供 




















TradeDSL 的 上 下 文 给 。 去 除 无 用 成 分 
待 求解 代码 e 转换 为 命名 参数 


。 预 处 理 以 产生 票据 DSL 


new trade 'T-12435' ,'acc-123' , :buy, 
100.shares.of('IBM'), UnitPrice=>100, Principal=>12000, Tax=>500 


| 


const_missing 将 符号 转换 为 字 
符 串 ， 字 符 串 之 后 会 被 映射 为 方法 


| 


security trade 的 实例 


图 5-6 “一段 rradqeDsL 脚 本 示例 被 代码 清单 5-6 的 程序 解释 并 生成 Ruby 对 象 的 全 过 程 。 
经 由 DSL 解 释 需 生成 了 一 个 securitvy _ trade 实例 


请 把 这 幅 图 与 代码 清单 5-6 对 照 着 来 理解 。 你 能 发 现 其 中 用 了 第 4 章 介绍 过 的 哪些 手法 吗 ? 还 
真 不 少 ， 三 不 五 时 就 改头换面 地 冒 出 来 一 个 。 下 面 的 列表 可 以 玫 你 发 现 几 个 : 

O const_missing 方 法 QQ 用 了 运行 时 元 编程 ( 见 4.4 节 ) 手法 , 它 将 任何 未 定义 的 常量 转换 
为 字符 串 ; 

Q interpretJjik'Püjinstance eval8fTraaepbsil 一 个 实例 设立 为 执行 hew_trade 
方法 的 隐 式 上 下 文 ( 见 4.2.1 市 ); 

O parse 方 法 使 用 正则 表达 式 全 处理 用 户 输入 ， 将 输入 转换 为 符合 new_trade 方 法 调用 形 
式 的 字符 串 。 

知 想 更 深入 了 解 Ruby 元 编程 技术 ， 请 参阅 5.7 节 文献 [5]。 

2. 像 老 鲍 那 样 说 话 

现在 从 DSEL 用 户 的 角度 回顾 一 遍 前 面 的 工作 。 用户 现 在 可 以 用 他 日 党 业务 活动 中 的 语言 写 出 
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生成 新 交易 的 DSL 脚 本 。 我 们 在 DSL 中 插入 了 一 些 无 意义 的 词汇 ， 以 尽量 符合 一 般 领 域 用 户 的 用 
语 习 惯 。 作 为 用 户 ， 老 饱 可 以 把 DSL 文 本 写 到 一 个 文件 内 ， 文 本 经 过 加 载 、 处 理 之 后 生成 
SecurityTrade 的 实例 。 即 使 交易 数据 来 自 上 游 的 营业 系统 ， 他 照样 可 以 用 这 DSL 生 成 
SecurityTrade 实 例 并 存 和 数据库 。 

下 一 节 我 们 继续 改进 DSL， 并 纳入 一 些 业务 规则 ， 一 方面 便利 于 程序 员 用 户 ， 另 一 方面 其 他 
的 领域 用 户 也 可 在 老 鲍 生成 的 交易 上 增补 规则 ， 用 于 后 续 的 交易 环节 。 











5.2.4 ”以 委 钱 器 的 形式 添加 领域 规则 

虽然 老 鲜 满意 目 前 的 交易 生成 方式 , 但 他 对 后 续 的 交易 环节 仍 有 些 担心 , 因为 后 面 要 在 交易 
上 补充 业务 规则 。 我 们 答应 老 鲍 立即 着 手 这 个 问题 ， 一 旦 这 部 分 语言 的 表现 力 过 关 就 拿 给 他 看 。 
那么 我 们 现在 就 开始 新 的 迭代 ， 目 标 是 增加 DSL 功 能 并 充实 交易 的 业务 规则 。 














È ”Ruby 知 识 点 

O 如 何 定 义 、 使 用 Ruby 块 。Ruby 语 言 的 块 (block ) 被 用 于 实现 lambda 和 闭 包 。 

口 如 何 通 过 模块 实现 mixin。Ruby 模 块 ( module ) 是 一 种 组 织 代 码 制 品 的 方式 。 类 可 以 通 
过 mixin 的 形式 包含 模块 及 其 中 的 制品 。 

O 如 何 串 联 不 同 的 mixin 来 设计 装饰 器 。 

口 鸭子 类 型 。 在 Ruby 语 言 中 ， 只 要 对 象 实现 了 与 某 消息 同名 的 方法 ， 就 可 以 响应 该 消息 。 
对 象 是 否 实现 了 特定 方法 不 作 静 态 检查 ; 可 在 运行 时 修改 对 象 。 只 要 能 学 鸭子 叫 ，Ruby 
就 认为 那 是 一 只 鸭子 。 





1. 交易 DSL 现 状 回顾 

我 们 不 能 一 味 埋头 改进 ， 在 着手 实现 交易 充实 功能 之 前 ， 不 妨 先 回顾 一 下 现在 所 处 的 位 置 。 
图 5-7 一 目 了 然 地 展现 了 目前 的 进展 和 后 续 的 任务 。 我 们 开发 的 交易 生成 DSL 会 产生 一 个 
SecurityTrade 实 例 ， 下 一 步 要 把 业务 规则 充实 到 交易 中 ， 可 考虑 将 业务 规则 建 模 为 DSL。 


SecurityTrade 








交易 生成 脚本 (DSL) 





纳入 DSL 的 候选 项 


可 插 拔 的 业务 规则 


图 5-7 ”我们 已 经 开发 了 生成 交易 的 DSL， 现 在 要 增加 用 来 计算 交易 现金 价值 的 业务 规 
则 。 我 们 准备 把 业务 规则 也 做 成 DSL 
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当 交 易 锌 送 到 证 券 交 易 机 构 的 后 台 时 , 将 被 附 上 其 现金 价值 和 评 态 数据 资料 , 为 进入 人 处理 流 
程 的 后 续 环 市 做 好 准备 。4.2.2 广 已 介绍 过 如 何 计算 交易 的 现金 价值 ， 也 叫做 净 结 算 价值 。 后 台 接 
收 到 交 多 之 后 ,需要 援 用 领域 规则 来 计算 交易 的 现金 价值 。 领域 规则 因 交 易 市 场 、 治 据 类 型 等 各 
种 因素 而 异 。 为 免 讨论 过 于 复杂 ,我 们 假设 有 一 组 固定 的 规则 。 为 了 在 生成 的 交易 上 实施 这 组 规 
则 ， 我 们 需要 扩展 现 有 的 DSL。 
2. 实现 领域 规则 
以 下 规则 运用 于 老 鲍 生成 的 交易 : 
口 交易 的 现金 价值 由 基本 价值 总 额 、 税 费 总 额 、 佣 金 总 额 计算 得 出 。 
O 如 来 输入 的 交易 流 含有 以 上 总 额 中 的 任意 项 ， 该 项 将 按 输入 的 数额 计算 ; 否则 按照 以 下 
规则 对 每 笔 交 易 分 别 计算 后 汇总 得 出 。 
a 以 下 业务 规则 适用 于 所 有 交 多 : 
m 基本 价值 上 总额 为 单价 与 数量 的 乘积 ， 单价、 数量 都 是 交易 对 象 的 一 部 分 。 
m 税 费 按 基本 价值 总 额 的 固定 比例 计算 。 
m 佣金 按 基本 价值 总 额 的 固定 比例 计算 。 
这 几 条 规则 实现 之 后 ， 用 户 使 用 DSL 充 实 交 易 的 情形 如 下 所 示 。 


代码 清单 5-7 交易 DSL 的 用 法 
require 'trade dsl' 
require 'cash value calculator' 























require 'tax fee' 
require 'broker commission' 


Str = ««END OF STRING 

new Lrade 'T-12435' tor account 'aocc-123"' 
to buy 100 shares of 'IBM', 
at UnitPrice = 100 

END OF STRING 


Mag 为 了 副作用 而 使 用 Ruby 块 


TradeDSL.trade str do |t| 


CashValueCalculator.new(t).with TaxFee, BrokerCommission do | cv| 
t.cash value = cv.value 
t.prineipal = ev.p 以 mixin 手 法 实现 的 装饰 器 
Detak = gu. 块 内 发 生 的 副作用 
t.commlsslon = vic 

end 

七 

end 


TradeDSL.trade (str) 牛 成 的 SecurityTrade 实 例 被 传递 到 一 个 Ruby 块 @ ， 然 后 作为 
securityTrade 实 例 在 块 内 被 修改 全 的 副作用 ， 完 成 了 交易 充实 过 程 。 以 上 写法 是 常规 的 、 合 
乎 语言 习惯 的 Ruby 编 程 方法 。 这 段 脚本 的 表现 力 是 简洁 的 Ruby 语 言 和 我 们 加 入 的 领域 语义 共同 
作用 的 结 

上 上 面 的 代码 将 TaxFee 和 Brokercommission 的 计算 逻辑 单独 抽象 出 来 ， 做 成 可 插 拔 的 DSL 
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部 件 ， 这 一 点 也 值得 注意 。 用 户 需 要 什么 部 件 ， 就 把 什么 部 件 连接 到 cashvaluecalculator 类 
0. 这 样 的 设计 手法 就 是 我 们 在 4.2.2 节 讨论 过 的 , 所 谓 的 “基于 mixin 的 编程 >。 一 个 个 mixin 组 件 
就 是 附着 在 主体 类 cashvaluecalculator 上 的 装饰 需 。 

我 们 还 要 对 TraqeDsL .tradqe 方 法 做 一 点 改动 才能 让 它 接 受 一 个 块 作为 参数 。DSL 的 其 他 部 


分 不 变 。 


代码 清单 5-8 ”交易 DSL 的 Ruby 实 现 : 为 了 副作用 而 使 用 Ruby 块 (第 三 次 迭代 ) 


require 'security trade' 














require 'numeric' 


class TradeDSL 
class «« self 
def const missing(sym) 
sym.to s.downcase 


end 
def trade(str) 


yield TradeDSL.new.interpret(str) if block given? 
end 0 处 理 块 ， 得 到 副作用 
end 


end 


代码 清单 5-7 还 留 下 了 一 点 未 解决 的 地 方 ,CashValueCalculator 实 例 上 很 明显 的 附加 了 各 
Rp, THE idis E B). 

3. 附加 小 饰 器 的 Ruby DSL 

代码 清单 5-7 回 你 演示 了 怎样 在 核心 抽象 上 到 点 像 raxFee 和 BrokerCcommission 那 样 的 语 
法 糖衣 。 而 且 与 静态 语言 不 同 , 我 们 的 疙 点 工作 可 以 借助 元 编程 的 力量 在 运行 时 巧妙 地 完成 。 下 
面 的 代码 清单 完整 地 实现 了 对 给 定 的 交易 计算 其 现金 价值 的 DSL。 


代码 清单 5-9 ”计算 交易 的 现金 价值 
class CashValueCalculator 
attr reader :trade 


attr accessor 2D, :t, :C M dd 含义 清晰 的 句法 
def initialize(trade) 
@trade = trade 
@p = [@trade.principal, 
@trade.unitprice * @trade.instrument.quantity].find do |m| 

















not m.nil? 


end 
@t = @trade.tax unless @trade.tax.nil? 
Qc = @trade.commission unless @trade.commission.nil? 
end 
def with(*args) 
args.inject(self) { |acc, val| acc.extend val } P 动态 地 合成 各 mixin 
yield self if block given? 
end 


def value 
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module TaxFee 
def value 
Gt s dp * 0.2 if @t.nil? 
super + Qt 
end 
end 


module BrokerCommission 
def value 
Ge = @p * 0.1 if @c.nil? 
super + (Qc 
end 
end 


成 了 ! 现在 我 们 的 DSL 外 有 老 鲍 能 理解 的 目 然 语法 ,内 有 领域 语言 表述 的 清晰 实现 。5.1 世 所 
述 的 动态 类 型 语言 三 大 特质 都 体现 在 我 们 的 Ruby DSL 上 ， 表 5-2 对 此 作 了 人 简要 总 结 。 








表 5-2 动态 语言 和 Ruby DSL 





特 RE 代码 清单 5-9 中 用 到 的 Ruby 特 性 
易 读 性 灵活 柔顺 的 语法 、 数 组 字面 量 、 可 选 的 圆 括 号 ， 这 儿 项 特性 使 jnitialize 方 法 @ 内 的 代码 清晰 


简明 。 领 域 规则 被 直 白 地 表达 出 来 ， 易 于 读者 理解 ， 如 果 输 入 交易 时 一 并 输入 了 现金 价值 的 构成 
要 素 ， 优 先 按照 输入 值 计 算 ， 否 则 从 交易 中 算出 

交易 的 现金 价值 总 额 由 混入 到 cashVvaluecalculator 实 例 的 各 模块 隐 含 地 计算 得 出 。 代 人 码 清 单 
5-7 的 DSL 脚 本 很 好 地 抽象 了 现金 净值 的 具体 计算 过 程 , 同时 又 清楚 地 告诉 用 户 计算 中 涉及 哪些 构 
成 要 素 。 实 际 上 ， 用 户 和 希望 最 后 的 净值 算 和 人 哪些 要 素 ， 就 提供 哪些 要 率 








HE FAN 注意 TaxFee 和 BrokerCommission 的 value 方 法 都 是 在 没有 任何 静态 继承 关系 的 情况 下 使 用 了 
super 关 键 字 。 这 是 对 鸭子 类 型 的 一 次 应 用 
只 要 搬入 任何 一 个 拥有 value 方 法 的 模块 ， 都 能 顺利 完成 计算 

元 编程 with 方法 加 起 到 了 组 合子 的 作用 ， 通 过 在 运行 时 扩展 各 参与 模块 ， 实 现 对 各 mixin 的 组 合 





交易 DSL 的 Ruby 实 现 至 此 全 部 完成 。 我 在 本 市 开头 提出 一 个 待 解 决 的 现实 用 例 , 然后 回 你 演 
示 基 于 DSL 的 问题 解决 方式 。 现 在 我 们 看 到 了 结果 ,并 为 打算 建 模 的 领域 功能 找到 了 最 自然 的 实 
现 方 式 。 借助 Ruby 语 言 的 灵活 语法 、 上 鸭子 类 型 和 元 编程 能 力 , 最 终 创造 出 一 种 领域 专家 能 完全 领 
会 的 专用 语言 。 我 们 一 边 改 进 实现 , 一 边 着 重 学 习 了 那些 使 Ruby 成 为 优秀 内 部 DSL 实 现 语言 的 特 
PES 这样 安排 不 是 为 了 卖弄 Ruby 的 能 力 ,而 是 反复 癌 你 演示 在 基于 DSL 的 开发 方式 下 ， 如何 配 合 
强力 的 编程 语言 去 创造 具有 扩展 性 的 抽象 。 

下 一 节 将 探讨 男 一 种 DSL 实 现 语言 , 它 像 Ruby 一 样 具有 动态 类 型 和 强大 的 元 编程 能 力 ， 而 且 
它 可 以 和 JVM 更 紧密 地 集成 。 我 们 在 第 2 音 和 第 3 章 设 计 指 令 处 理 DSL 的 时 候 已 经 用 过 它 一 一 
Groovy 语 言 。 现 在 我 们 准备 再 对 之 前 的 实现 做 一 些 改进 。 
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你 有 没有 想 过 既然 平常 的 开发 多 半 只 会 用 一 种 语言 ,那么 我 们 为 什么 要 学 习 那 么 
多 种 语言 呢 ? 在 现实 的 开发 中 ， 最 切合 解答 域 需 要 的 语言 才 是 最 理想 的 DSL 实 现 
语言 。 请 记 住 DSL 的 语法 和 语义 才 是 最 重要 的 决定 因素 ; 选择 哪 种 实现 语言 只 是 手段 而 
已 。 你 学 到 手 的 套路 越 多 ,设计 DSL 的 时 候 能 使 的 招式 就 越 多 。 





5.3 ”指令 处 理 DSL: 精益 求 精 的 Groovy 实现 


以 语言 的 能 力 来 说 ，Groovy 与 Ruby 较 为 接近 ， 都 文 持 鸭子 类 型 ， 也 都 有 很 强 的 运行 时 元 编 
程 的 能 力 。 两 种 语言 的 主要 区 别 在 于 Groovy 共 享 了 Java 的 对 象 模型 ， 因 此 Groovy 的 无 颖 集成 能 
HFERubys&, KERE, GroovyZN ELS STE ZJJavaia A HJ—TPDSLOK ER. Pub, AURTIRBJDSLTS 
S A Java HRR, Groovy PEKA EH o TEJJDSL BS TE Ei Hi, Ruby 和 Groovy 
的 实现 能 力 相 近 。 但 由 于 Groovy 能 共享 Java 的 对 象 系统 ， 它 的 集成 能 力 更 强 一 些 。 

本 节 我 们 再 次 翻新 之 前 在 第 2 章 和 第 3 章 先后 实现 、 加 强 过 的 指令 处 理 DSL。Groovy 有 一 些 与 
Ruby 相 似 的 特性 ， 我 们 上 一 节 用 Ruby 实 现 交 易 DSL 时 已 经 讨论 过 ， 本 市 不 再 着 重 介 绍 。 本 方 我 
们 的 讨论 重点 是 Groovy 一 项 特别 突出 的 元 编程 特性 ， 你 在 设计 内 部 DSL 的 时 候 会 常常 用 到 它 。 

在 正式 展开 讨论 之 前 ,我们 将 人 简要 回顾 指令 处 理 DSL 的 前 几 次 迭代 , 分 析 其 中 的 不 足 ， 然后 
我 们 持续 改进 ， 下 至 最 后 版 本 的 完善 实现 。 




















5.3.1 指令 处 理 DSL 的 现状 


我 们 已 经 讨论 过 多 种 Groovy 实 现 选 项 ， 人 简要 总 结 如 图 5-8 所 示 。 


第 2 章 (2.2.37) => 通过 GroovyShe11 由 Groovy 解 释 器 执行 的 Groovy DSL 
第 3 章 (32.15) => 通过 Java 6 脚本 引擎 执行 的 Groovy DSL 
第 3 章 (3.2.3 节 ) => 通过 GroovyclassLoader 由 Java 虚 拟 机 执行 的 Groovy DSL 


图 $-8 ”前 面 章节 中 学 试 过 的 多 种 指令 处 理 DSL 实 现 方案 


通过 GroovySshe11 在 Groovy 环 境内 执行 DSL， 我 们 在 2.2.3 节 从 头 到 尾 完成 过 一 个 GQroovy 实 
现 。GroovySshel11 用 它 的 evaluate 方 法 执行 接收 到 的 DSL 定 义 和 脚 本 。 在 3.2.1 节 ， 我 们 修改 了 
DSL, 并 改 用 Java 6 脚本 引 敬 API 来 执行 。 最 后 在 3.2.3 节 , 我 们 用 更 好 的 选择 取代 了 3.2.1 节 的 方案 ， 
不 再 假手 脚本 引擎 的 独立 的 Java 类 区 载 硕 ， 改 为 在 Java 应 用 中 通过 GroovyclassLoader 下 接 加 
载 指令 处 理 DSL 的 脚本 。 
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我 们 答 试 过 的 几 种 方案 郡 有 一 处 共同 的 缺点 , 这 与 Groovy 元 编程 概念 的 用 法 有 关 。 本 市 我 们 
将 继续 改进 ， 尝 试 建立 更 好 的 Groovy 元 编程 模型 来 驱动 DSL。 


5.3.2 ”控制 元 编程 的 作用 域 


在 剖面 的 方案 中 ， 我 们 问 已 有 的 Groovy 类 中 注入 方法 ， 做 法 是 在 相应 类 的 Metaclass 中 增 
加 方法 。 











1 Groovy 知 识 点 

O ExpandoMetaCclass 及 其 元 编程 原理 。HExpandoMetaCclass 是 一 种 特殊 的 Groovy 元 编 
程 结构 ,允许 使 用 者 通过 简洁 的 闭 包 语法 , 动态 地 增加 方法 、 构 造 器 、 属 性 和 静态 方法 。 

Q B] &, (closure ) 和 委托 (delegate )。Groovy 语 言 的 闭 包 是 在 一 个 地 方 定 义 ， 在 另 一 个 地 
方 执行 的 lambda， 用 法 很 像 Ruby 的 块 (block )。 委 托 对 象 一 般 是 闭 包 所 从 属 的 对 象 ， 但 
可 在 运行 时 更 改 。 

口 Groovy 语 言 的 类 声明 。 类 似 于 Java, 但 可 省 去 繁琐 的 类 型 声明 , 且 Groovy 的 语法 较 简 洁 。 

口 Groovy 语 言 的 Category 特 性 如 何 控 制 元 编程 的 作用 域 。Category 是 Groovy 语 言 除 Expando- 
Metaclass 之 外 的 另 一 种 元 编程 手段 。 程 序 中 对 元 对 象 的 改动 可 以 通过 Category 控 制 其 
作用 范围 。 





我 们 在 代码 清单 3-1 里 面 ， 用 了 下 面 两 行 代 码 向 Integer 类 注入 shares 和 of 方法 : 


Integer.metaClass.getShares = { -> delegate } 








Integer.metaClass.of = { instrument -> [instrument, delegate] j 
因为 做 了 这 样 的 铺垫 ， 我 们 才 得 以 写 出 下 面 的 DSL 脚 本 〈 取 目 代 但 清单 3-2 ): 
newOrder.to.buy(100.shares.of('IBM')) { 

limitPrice 300 

allOrNone true 

valueAs (qty, unitPrice -> qty * unitPrice - 500} 


j 

我 们 进行 注入 的 时 候 利用 y Groovy 的 ExpandoMetaClass, 通过 它 可 以 在 运行 时 [5] 已 有 的 
类 中 添加 方法 、 属 性 、 构 造 闫 以 及 静态 方法 。 但 ExpandoMetaclass 的 问题 是 , 注入 到 类 中 的 属 
性 和 方法 是 全 局 有 效 的 ， 程 序 会 改变 JVM 内 所 有 线程 中 的 全 部 类 实例 的 行为 。 
ExpandoMetaclass 把 你 对 类 的 改动 公开 给 所 有 用 户 。 但 凡 像 这 样 可 能 波及 其 他 人 和 其 他 程序 的 
情况 , 都 应 该 三 思 而 后 行 。Ruby 的 猴子 补丁 也 有 同样 的 全 局 作用 问题 ,一样 会 对 其 他 用 户 产生 附 
帘 的 影响 ， 而 且 不 同 用 户 对 于 类 和 方法 的 定义 有 看 不 同 的 预期 ， 彼 此 之 间 可 能 不 相 容 。 

Groovy 拥 有 对 元 编程 作用 域 进 行 细 粒 度 控制 的 能 力 ， 这 是 你 在 实现 Groovy DSL 时 应 该 充分 
利用 的 一 个 特点 。 因 为 这 项 特性 的 重要 性 ， 我 们 会 单独 用 一 市 的 访 幅 来 讨论 Groovy 实 现 。 

1. Groovy 的 元 对 象 协 议和 Category 特 性 

Groovy 的 元 对 象 协 以 (MOP ) 是 男 一 种 注入 手段 ， 可 以 有 选择 、 有 市 制 地 对 已 有 类 进行 注 
入 。 用 这 种 方式 注入 的 属性 并 不 会 完全 又 露 给 全 局 ,而 是 将 其 作用 域 限 制 在 一 定 范围 的 代码 块 之 
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内 。 程 序 员 在 一 种 称 为 Category 的 特殊 类 中 定义 准备 注入 的 新 方法 。Category 在 Groovy DSL 的 创 
作 中 应 用 得 非常 普遍 。( 关于 Groovy 语 言 Category 特 性 的 详细 解释 请 参阅 5.7 节 文献 [2]。 ) 下 面 我 们 
就 要 利用 Category 特 性 来 改造 指令 处 理 DSL 了。 代码 清单 5-10 用 Groovy 语 言 对 Order 的 基本 抽象 
进行 了 建 模 。 








代码 清单 5-10 ”Groovy 语 言 实现 的 0rder 类 


class Order { 
def name 
def quantity 
def allOrNone = false 
def limitPrice 
def valueClosure 


def Order(stockName, qty) { 
name - stockName 
quantity = qty 

] 


def limitPrice(price) (limitPrice = price) 


def allOrNone() {allOrNone = true) 


def valueAs(closure) { u 确保 线程 安全 


valueClosure = closure.clone() 
valueClosure.delegate - 
[qty: quantity, unitPrice: limitPrice] 
Hu 绑 定 自由 变量 


} 





String toString() { 
"Stock: $name, number of shares: $quantity, 
allOrNone: SallOrNone, limitPrice: SlimitPrice, 
valueAs: $í(valueClosure())]" 


j 

T IBIDSLAS TERI f HB TRIS ERYRZ I ARRERA AEKA SX 3c HB Hoe, 例如 类 似 
“200.IBM. shares” 的 写法 。 我 们 会 运用 Groovy 语 言 的 Category 特 性 来 实现 这 种 表达 方式 ， 不 
过 首先 需要 一 个 辅助 类 的 帮忙 。 下 面 定义 的 stock 类 是 对 此 表达 形式 的 抽象 ， 指 令 的 其 余 信息 可 
以 放 在 一 个 财 包 里 传递 给 它 。 


class Stock ( 
def order 





Stock(orderObgject) { 


order - orderObject 
j 
def shares(closure) { uH 确保 线程 安全 
closure = closure.clone() 
closure.delegate = order 
closure() E 将 指令 相关 信息 交 给 委托 对 象 


order 
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与 其 直接 说 明 下 一 步 如 何 实现 ， 倒 不 如 先 让 你 看 看 改造 完成 之 后 的 指令 处 理 DSL 是 什么 样 
子 ， 到 时 候 你 胸有成竹 , 才 更 容易 理 清 实现 的 思路 。 老 鲍 将 使 用 这 样 的 脚本 来 发 出 他 的 股票 交易 


指令 : 





代码 清单 5-11 一 段 指令 处 理 DSL 的 脚本 


buy 200.GOOG.shares { 
limitPrice 300 
allOrNone() 
valueAs {qty * unitPrice - 500) 


buy 200.1IBM.shares { 
limitPrice 300 
allOrNone() 
valueAs {qty * unitPrice - 500} 


buy 200.MSOFT.shares { 
limitPrice 300 
allOrNone() 
valueAs {qty * unitPrice - 500} 


从 中 可 以 看 出 我 们 需要 给 Integer 类 加 上 一 些 方法 ， 这 一 次 我 们 要 通过 Category 来 实现 。 
2. 基本 的 DSL 
下 面 是 第 一 个 Category 的 代码 ， 它 的 作用 是 帮 我 们 构建 不 同 的 stock 实 例 。 


代码 清单 5-12 通过 Category 在 Integer 上 增加 方法 


class StockCategory { 
static Stock getGOOG(Integer self) { 
new Stock (new Order("GOOG", self)) 
j 


static Stock getIBM(Integer self) ( 
new Stock(new Order("IBM", self)) 
] 


static Stock getMSOFT (Integer self) { 
new Stock(new Order("MSOFT", self)) 
} 

} 

由 这 段 Stockcategory 的 定义 可 知 ， 调 用 200.IBM 将 返回 一 个 stock 实例 。 然 后 我 们 在 
Stock 实 例 上 调用 shares 方 法 , 把 别 的 指令 详情 放 在 一 个 财 包 里 , 作为 参数 传递 给 shares 方 法 。 
在 Stock 类 的 定义 中 , 将 shares 所 接收 闭 包 的 委托 对 象 设置 为 一 个 order 实 例 。 这 样 , 代码 清单 
5-11 中 出 现 的 limitPrice、allOrNone、valueAs 的 上 下 文 就 都 有 了 着 游 。 在 现实 的 项 目 中 ， 
代码 清单 可 以 根据 数据 库 中 的 股票 列表 目 动 生成 。 
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至 此 指令 处 理 DSL 的 基本 引擎 已 经 就 绪 ， 我 们 还 可 以 在 最 后 加 上 一 个 Category 让 脚本 更 有 和 锭 
理 ， 然 后 装 好 Java 有 局 动 和 人口 就 算 顺 利 完 工 。 


5.3.3 ”收尾 工作 


请 你 再 看 一 过 代 但 清单 5S-11。 脚 本 中 每 一 条 指令 都 以 puy 开 头 , 也 就 是 说 , RA 1085 22 [n] Groovy 
的 Script 类 注入 一 个 buv 方 法 。 我 们 依旧 用 Category 来 实现 : 


class OrderCategory { 
static void buy(Script self, Order o) { 
printlm "Buy: $o" 
j 


static void sell(Script self, Order o) ( 
println "Sell: Bo" 
j 
j 


作为 演示 , 我 们 只 是 简单 地 将 用 户 输入 的 指令 打印 出 来 , 供 检查 各 属性 是 否 正 确 设置 。 在 实 
| 味 的 项 目 中 ， 这 个 地 方 应 该 蔡 换 为 有 意义 的 相关 领域 逻辑 。 

做 完 这 一 步 ，Groovy 的 DSL 实 现任 务 就 完成 了 。 现 在 只 需要 准备 一 个 负责 执行 DSL 脚 本 的 执 
行 希 ， 供 Java 应 用 程序 调用 。 执 行 DSL 的 Groovy 代 码 如 下 ， 其 中 导入 了 之 前 定义 的 两 个 Category: 


class DslRunner { 




















static runDSL(dsl) ( 9 导入 相关 Category 的 定义 
use(OrderCategory, StockCategory) ( 
new GroovyClassLoader().parseClass(dsl as File).newInstance().run() 


} 
} 
} 


注意 代码 中 的 use o3, 3i ol xt CategoryTE A ARARUNA, MEANEN 
有 效 。 最 后 我 们 在 Java 应 用 程序 内 调用 ps1Runner: 


public class LaunchFromJava { 
public static void main(String[] args) { 
DslRunner.runDSL("newOrder.dsl"); 
} 
j 


大 功 告 成 ! 一 段 Groovyy 的 DSL 实 现 就 在 你 眼前 化 师 为 紫 。 图 5$-9 形 象 地 访 明 了 DSL 脚 本 被 翻 详 
为 语义 模型 ， 然 后 被 送 入 执行 阶段 的 过 程 。 

Groovy DSL 的 进化 之 旅 到 这 里 告 一 段落 。 下 一 站， 我 们 将 发 挥 Clojure 的 特长 ， 实 现 一 种 完 
全 不 同 风 格 的 DSL。 








128 ”第 5 章 Ruby, Groovy, Clojure 语言 中 的 内 部 DSL 设计 


(ERR) 运行 期 间 生成 、 组 合 代码 


修改 后 的 stock 对 象 





旨 令 处 理 DSL 
修改 后 的 order 对 象 
StockCategory 


(各 元 对 象 ) 


— DSL 脚 本 —> 二 一 一 语义 模型 — ——— — 执行 模型 —: 


图 5-9 M Groovy DSL 脚 本 到 语义 模型 ， 再 到 执行 模型 的 转化 过 程 





可 执行 的 字 市 码 


5.4 思路 馆 异 的 Clojure 实现 





本 届 将 为 你 展示 如 何在 Clojure 语 言 中 实现 计算 交易 的 现金 价值 。( 假如 记 不 清 交 易 的 现金 价 
值 是 如 何 定 义 的 ， 请 翻阅 4.2.2 方 的 插入 栏 。) 我 们 照例 采用 基于 DSL 的 实现 方式 ， 目 底 疝 上 先 建 
立 在 干 小 的 领域 抽象 ， 然 后 利用 Clojure 的 组 合子 把 它们 组 合 起 来 。 

同样 的 用 例 已 经 在 5.2.4 市 中 用 Ruby 语 言 实现 过 一 裔 ， 那 我 们 为 什么 要 重复 呢 ” 因 为 Ruby 语 
言 的 编程 范 陈 与 Clojure 完 全 不 一 样 。Ruby 是 一 种 面 癌 对 象 声 言 ， 运 行 时 元 编程 是 其 主要 的 DSL 
实现 手段 .Clojure 基 本 是 一 种 晒 数 式 请 言 , 它 的 宏 特 性 具有 很 强 的 编 详 时 元 编程 能 力 。 显 然 Clojure 
的 实现 思路 会 与 Ruby 或 Groovy 有 很 大 差异 。 即 使 用 例 相 同 , 基于 Clojure 的 DSL 和 基于 Ruby 的 DSL 
实现 起 来 完全 可 能 是 两 回 事 。 所 以 , 我 们 在 此 特意 选择 与 Ruby 范 例 相 同 的 用 例 , 回 你 说 明 选 择 不 
同 循 主 语言 对 设计 决策 的 影响 。 表 S$-3 列 举 了 Clojure 相 对 于 Ruby 的 关键 差异 点 。 对 Clojure 语 言 本 
吴 的 详细 介绍 ， 请 参阅 5.7 下 文献 [6]。 




















表 5-3 ”用 Clojure 语 言 实现 DSL 的 时 候 需 要 改变 思维 方向 
Ruby 语 言 的 DSL 实 现 Clojure 语 言 的 DSL 实 现 


以 对 象 和 模块 为 思考 对 象 ， 考 虑 如 何 通过 元 编程 把 运行 ”以 用 例 中 的 函数 为 思考 对 象 ， 考 虑 如 何 通过 Clojure 序 列 
时 的 对 象 和 模块 组 合 在 一 起 ( sequences ) 的 lambda 操 作 来 组 织 各 困 数 








i5Hjmethod missing, const missing 等 技巧 ， 以 及 其 他 动 ” 运用 安 将 DSL 语 法 转换 为 一 般 的 Clojure 语 法 成 分 ， 转 换 完 
态 元 编程 特性 使 DSL 简 洁 有 表现 力 全 在 编译 时 完成 





Ruby 或 Groovy 语 言 实现 的 DSL， 其 语法 风格 不 一 定 接近 Clojure 语 言 实现 的 DSL， 因 为 仍然 以 “S 表 达 式 ”为 结构 基 
于 和 宿主 语言 础 ， 其 语法 风格 接近 于 Clojure 
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我 强烈 建议 你 先 把 前 面 的 Ruby 实 现 温习 一 各, 再 跟着 我 一 起 学 习 下 面 的 Clojure 实 现 , 这 样 你 
会 对 两 者 的 差异 有 更 深 的 体会 。 





5.4.1 建立 领域 对 象 


构建 DSL 先 要 有 一 些 基本 抽象 作为 核心 的 领域 模型 。 那 么 ,我们 第 一 步 先 设计 好 “交易 ” 抽 
象 ， 并 且 给 它 定义 一 个 工厂 方法 ( 见 代 码 清单 5-13 )， 然 后 根据 传人 的 信息 生成 交易 对 象 。 














定义 ”工厂 方法 是 一 种 设计 模式 ， 它 为 一 组 相似 对 象 的 实例 创建 操作 提供 单一 的 交互 入 口 。 


1 Clojure 知 识 点 
口 基本 的 函数 定义 和 语法 。Clojure 的 语法 接近 于 Lisp， 陌生 的 前 级 表示 法 可 能 让 你 措 手 不 
及 。 如 果 不 习 惯 Clojure 的 语法 ， 请 细 读 一 下 5.7 节 文献 [4] 的 基础 知识 。 
口 定 义 Map 数 据 结 构 。Clojure 编 程 中 常用 Map 数 据 结构 来 仿造 “类 ”这 种 OO 编程 结构 。 





属性 可 以 来 日 Web 请 求 、 文 本 文件 、 数 据 库 ， 系 统 连接 到 的 任何 数据 源 都 可 以 作为 交易 对 和 象 
的 信息 来 源 。 工 厂 方法 从 请 求 中 提取 信息 ， 并 建立 一 个 map 来 表示 一 笔 交 易 的 全 部 属性 。 


代码 清单 5-13 ”生成 交易 的 Clojure 代 人 码 
(defn trade 
"根据 请 求 产生 一 笔 交 易 " 





[request] 9 从 请 求 构 建交 易 

i:rer-no (:ref-no request) 
:account (:account request) * —ÜS 
:instrument (:instrument request) 基本 价值 = 单价 * 数量 
:principal (* (:unit-price request) (:quantity request)) 
:tax-fees {}}) 6 

(def request a 

i - " u " S EE Tr H T 

{:ref-no "trd-123 P 请 求 样 例 


:account "nomura-123" 
:instrument "IBM" 
:unit-price 120 
:quantity 3003) 


Clojure EXI RRAZ E [9] HH ER S —^ PROC Zn E EE s | npn e 4E PEEL SICHER — 3 91 
键 - 信 对 , 也 就 是 Clojure Map JEN. H.rfezadezé— SKA, fA SR du A request A TURO fH 
息 建立 必要 的 抽象 。 作 为 输入 的 request 全 也 是 一 个 Map， 被 实现 为 各 键 的 函数 。 当 我 们 从 Map 
中 提取 信息 的 时 候 ， 所 用 语法 与 AHS 前 数 调用 相同 @。 例如 字面 量 语 句 (:account request) 
意 为 从 Map 中 取出 account 键 的 值 。 

trade 方 法 清晰 地 表达 了 领域 意图 和 领域 语义 。Clojure 的 map 字 面 量 语法 起 到 了 命名 参数 的 
效果 ， 领 域 概念 可 以 直接 被 映射 为 编程 元 系 ， 从 而 提高 了 代码 的 表现 力 。tax-fees 这 个 map 目 
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前 只 是 一 个 占 位 符合 ， 下 一 节 对 生成 的 交易 进行 后 续 充 实 操作 时 再 填 人 具体 的 内 容 。 
5.4.2 JE TRE Vb eR 76 Sc ISO] K 


下 一 步 要 对 基本 抽象 进行 补充 , 使 之 适用 于 交易 周期 中 的 具体 用 例 。 新 的 特性 以 装饰 妖 的 方 
式 附 加 到 基本 抽象 之 上 , 我 们 在 5$.2.4 节 就 通过 同样 的 模式 在 Ruby 实 现 中 加 入 税 费 组 件 。 不 过 这 一 
次 的 实现 手段 是 Clojure 语 言 的 编译 时 元 编程 和 宏 。 





EA DSEL 的 设计 工作 要 将 目标 语法 映射 到 语言 背后 的 语义 。 那 么 当 实 现 语言 变 了 ， 思 
维 方式 也 应 该 随 之 改变 。 


1 Clojure 知 识 点 

OQ 高 阶 函 数 。Clojure 支 持 高 阶 函 数 特性 ， 函 数 完全 可 以 像 值 一 样 使 有 用。 函数 可 以 作为 参数 
来 传递 ， 也 可 以 充当 返回 值 ， 诸 如 此 类 。 

口 宾 是 用 Clojure 语 言 开发 DSL 的 根本 秘诀 。 宾 是 编译 时 元 编程 的 基本 组 织 元 素 。 

口 “Let 绑 定 ” 和 词法 作用 域 。 不 管 作 用 域 有 多 小 ， 你 都 可 以 根据 需要 精确 指定 绑 定 的 作 
用 域 。 

口 掌握 Clojure 标 准 库 函数 。Clojure 网 站 ( http://clojure.org ) 上 有 丰富 的 相关 资源 。 

口 不 可 变数 据 结 构 。Clojure 提 供 不 可 变 、 持 久 化 (persistent ) 的 数据 结构 。 这 里 的 “持久 
化 ” 指 即使 改动 了 数据 结构 之 后 ， 用 户 仍 可 以 访问 所 有 旧版 本 的 数据 。 详 见 $.7 节 文献 [4]。 

口 若干 基本 的 组 合子 ， 如 reduce 和 ->。 组 合子 是 以 其 他 函数 作为 参数 的 函数 ， 能 帮 你 写 
出 简洁 而 有 和 表现 力 的 代码 。 


怎么 样 才能 动态 地 给 抽象 增加 新 行为 , 却 不 增加 运行 时 的 性 能 负担 呢 ? Clojure 给 出 的 答案 是 
编译 时 mixin。 我 们 来 看 看 具体 的 做 法 。 

1. 使 用 Clojure 组 合子 

假设 我 们 有 一 个 with-tax-fee 结 构 , 它 的 作用 是 在 现 有 的 Clojure 函 数 上 引入 新 的 行为 ,从 
而 给 我 们 的 交易 加 上 税 费 。 在 下 面 的 代码 户 段 中 ， 当 with-tax-fee 作 用 于 traqe 国 数 时 ， 我 们 
会 得 到 一 个 新 的 trade 限 数 ， 新 印 数 在 原 有 属性 集合 上 增加 了 :tax 和 :commission 两 则 映 冉 。 


(with-tax-fee trade 
(with-values :tax 12) 
(with-values :commission 23)) 


在 这 里 ， with-tax- fee 充 当 J trade PRA BARS BR S 现在 当 你 根据 request 执 行 trade PKI 
数 时 ,其 中 的 税金 和 佣金 项 目 将 分 别 被 设置 为 基本 价值 的 12% 和 23%。( 税金 和 佣金 一 般 以 交易 基 
本 价值 的 百分比 来 计算 。) 

除了 DSL 的 实现 者 , 别 的 人 一 般 不 需要 关心 with-tax-fee、with-values 等 语言 构造 的 具 
体 实现 , 把 它们 当做 一 般 的 组 合子 用 于 交易 DSL 的 抽象 设计 即 可 ,不 过 本 节 既 然 讨论 DSL 的 实现 ， 
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目 然 应 该 探讨 ， 什 么 样 的 函数 才能 充当 男 一 个 限 数 的 装饰 天 ， 为 其 补充 新 的 行为 。 下 面 是 
with-values 的 实现 。 


代码 清单 5-14 tradet Z fui — ET 


(defn with-values [trade tax-fee value] 0 高 阶 函 数 
(fn [request] -© 返回 一 个 函数 
(let [trdval (trade request) 
principal (:principal trdval)] P paana P 以 基本 价值 的 百分比 的 形 
(assoc-in trdval [:tax-fees tax-fee] 式 存 入 :tax-fees Map 
(* principal (/ value 100)))))) 


wi th-values 组 合子 对 trade PR ŽC 的 输出 做 了 不 少 补 充 工 作 。 昌 说 本 书 的 主题 不 是 介绍 
Clojure 语 言 , 但 对 于 这 段 代 码 ， 有 必要 深入 齐 析 Clojure 语 言 特性 在 其 中 所 起 的 作用 。 这 样 有 助 于 
你 理解 Clojure 语 言 如 何以 其 抽象 能 力 化 繁 为 全， 回 用 户 呈 现 人 简洁 的 API， 如 表 5-4 所 示 。 


表 5-4 解剖 Clojure API 











Clojure 语 言 特性 在 DSL 中 的 运用 
高 阶 函 数 是 实现 DSL with-values 的 第 一 个 参数 是 个 函数 @; with-values 隐 数 返回 为 一 个 函数 @; 这 些 都 是 Clojure 
的 基本 要 素 之 一 语言 把 函数 视 同 于 一 般 的 值 的 具体 表现 。Clojure 支 持 高 阶 函 数 ， 所 以 你 可 以 把 函数 当成 参数 


来 传递 ， 当 成 返回 值 来 获取 ， 就 像 语 言 中 的 其 他 数据 类 型 一 样 
fn 表示 一 个 匿名 函数 @。 witn-values 所 返回 的 这 个 匿名 也 数 ， 对 with-values 的 输入 函数 
trade 进 行 了 增补 ， 增 加 填充 :tax-fees Map 的 行为 
求 值 时 指定 词法 上 下 ”我们 用 新 函数 的 参数 来 调用 tradqe 和 四， 然后 把 tax-fee 的 值 补 充 到 结果 的 Map 里 
文 以 控制 其 作用 域 ”将 let 后 面 的 多 个 绑 定 项 依 先后 次 序 进行 绪 定 ， 所 以 后 一 项 绑 定 principal 可 以 引用 前 一 项 
绑 定 trdval 
不 可 变性 、 实 现 持 久 ” 这 上段 代码 的 最 后 一 步 , 是 把 cax-fee 和 value 参 数 凑 成 一 个 键 - 值 对 @, HA trade KAEO 
化 数据 结构 的 能 返回 的 Map 
在 这 个 过 程 中 ， 原 来 的 Map 保 持 不 变 。clojure 实 现 了 不 可 变 和 持久 化 的 数据 结构 。 因 此 ， 
assoc-in 每 次 调用 都 会 返回 一 个 新 的 Map， 比 原来 的 Map 多 了 参数 里 指定 的 一 对 键 值 
函数 可 以 自然 地 组 合 ” ”with-values 的 返回 结果 是 一 个 子 数 ,这 有 利于 实现 串联 调用 。 我 们 可 以 把 代码 写成 这 个 样子 : 
在 一 Ü (with-tax-fee trade 
(with-values :tax 12) 











(with-values :commission 23)) 

我 们 把 两 次 with-values 调 用 跟 原 来 的 trade 函 数 串联 在 一 起 。 方 法 的 串联 调用 体现 了 语言 
的 组 合 性 ， 我 们 说 过 这 是 一 种 优秀 的 DSL 特 质 。clojure 等 语言 将 孔 数 视 同一 般 的 值 ， 造 就 
了 很 好 的 组 合 能 力 


那么 , with-tax-fee 怎 样 与 with-values 合 力 构成 新 的 trade 国 数 呢 ? 这 是 我 们 下 面 要 讨 
论 的 内 容 。 

2. 高 阶 函 数 实现 的 装饰 器 

我 们 还 欠缺 一 个 知识 点 才能 讲解 清楚 with-tax-fee 的 原理 ， 这 个 知识 点 虽然 不 怎么 起 眼 ， 
却 是 区 饰 融 的 实现 基础 。 对 比 总 是 围绕 着 对 象 来 展开 的 Ruby 实 现 ， 我 们 越 来 越 认 识 到 ，Clojure 
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把 函数 放 在 了 更 重要 的 位 置 上 ， 而 且 它 为 此 准备 了 很 多 巧妙 的 手段 。 作 为 一 种 基本 思路 ，Clojure 
DSL 就 应 该 从 Clojure 里 发 掘 最 自然 、 最 符合 语言 习惯 的 手法 来 实现 。 下 面 的 代码 片段 演示 了 
Clojure zi MKA "FREE" (threading) 手法 。 


(def trade 
(-» trade 
(with-values :tax 20) 





(with-values :commission 30))) 


-> 宏 将 它 的 第 一 个 参数 传 给 参数 序列 中 的 下 一 个 form， 结 果 青 传 给 再 下 一 个 form， 如 此 
依次 传递 下 去 ， 如 同 把 这 些 form 串 成 了 一 串 。Clojure 的 晒 数 串 接 让 实现 凌 饰 硕 变 得 轻而易举 ， 
因为 只 要 用 -> 把 一 个 函数 串 接 到 它 的 闻 饰 硕 ， 就 等 于 完成 了 对 冰 数 的 重 定 义 。 人 代码 清单 5-15 
所 示 的 冯 饰 副 实 现代 人 码 就 运用 了 这 种 技巧 。 这 段 代码 来 日 Clojure 语 言 Web 开 发 框架 Compojure 
( FE V. http://github.com/weavejester/compojure ) WR EAZ&Clojurei& zi, MRa Bee $1— 252] 
夫 才 能 理解 这 里 提 到 的 编程 概念 。 但 一 旦 领会 了 Clojure 用 小 的 函数 式 抽象 组 合成 大 的 函数 式 
抽象 的 设计 思路 , 你 就 能 欣赏 到 上 面 短 短 四 行 代 码 的 强烈 美感 , 并 且 感 激 它 们 对 DSL 实 现 所 做 
的 贡献 。 

3. E ŻA BJ Clojurezz 

HEEAEHJP B o BENE, NSULHM T TESUPRZCEB BEPRTEBUROEOE, ER T Ha Esh, 还 
不 产生 任何 运行 时 的 额外 负担 。 于 是 就 有 了 代 但 清单 5-15 。 


代码 清单 5-15 Clojure ftis 
(defmacro redef 


" 重 定义 一 个 现 有 值 ， 保 持 元 数据 不 变 。" 


[name value] 











"(let [mł (meta t'-name) 
vi (def -name -value)] 
(alter-meta! vi merge mi) 


Vado 9 Clojurezz 
(defmacro with-tax-fee 


"将 函数 包 入 一 个 或 多 个 装饰 器 。" 
[func & decorators] 
"(redef -func (-» -func -Gdecorators))) 


ZR JLEBRAH Hwith-tax-feelff 458—— ——^ Clojureis zi 23 LR, EAE AJ XR] 
现 有 抽象 增补 新 行为 的 编译 时 装饰 器 。with-tax-fee 被 实现 为 一 个 宏和 上， 因 此 它 所 封装 的 代码 
将 在 编译 过 程 的 宏 展开 阶段 被 释 放出 来 。 

在 装饰 过 程 中 ， 输 入 果 数 的 原 值 ， 即 根 绑 定 (rootbinding ) 会 被 我 们 重新 定义 ， 同 时 保持 其 
元 数据 不 变 ,。 这 就 是 redef 宏 的 工作 ,这 个 装饰 过 程 不 像 Ruby 元 编程 那样 在 执行 阶段 才 实 际 发 生 ; 
Clojure 在 运行 时 不 存在 任何 元 对 象 ， 所 有 的 定义 在 宏 展 开 阶 段 就 已 经 确定 了 。 

现在 我 们 的 DSL 可 以 在 交易 抽象 上 补充 税 费 计算 逻辑 了 ,这 看 实绩 了 不 少 功夫 。 有 了 新 的 种 
装饰 的 trzade 困 数 ， 计 算 交 易 的 现金 价值 的 API 也 很 容易 能 定义 出 来 。 我 们 之 所 以 能 实现 有 意义 
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的 领域 抽象 ， 讨 论 至 今 的 Clojure 特 性 功 不 可 没 。 下 面 的 API 明 白 无 误 地 说 明了 自己 是 如 何 计算 交 
易 净 值 的 。 任 何 熟悉 金融 交易 和 领域 语言 的 人 都 能 理解 该 函数 的 意图 。 
(defn net-value [trade] 
(let [principal (:principal trade) 
tax-fees (vals (trade :tax-fees))] E 组 合子 提高 了 抽象 程度 
(reduce + (conj tax-fees principal)))) 

XJLÍT n] Clojureitt zi Re EREE o Clojureze— fp ZAR BUE HB. 适合 在 比较 高 的 
MREKEHÍT E. EA TRHA f RB di AIME. reduce sT 
递归 地 作用 于 后 面 的 序列 ， 依 次 施加 指定 的 函数 (+ ) 9. 

4. 我 们 的 成 果 

我 们 的 DSL 只 琵 下 最 后 的 执行 步 又 , 成 功 在 望 ,反而 不 必 急 于 一 时 ,我 们 不 妨 耐 心 对 照 表 5-5， 
总 结 一 下 到 目前 为 止 我 们 为 实现 计算 交易 现金 价值 的 DSL 做 了 哪些 事情 。 


表 5-5 ”DSL 的 演变 过 程 
DSL 的 演变 步骤 实现 细节 
(1) 设计 交易 的 基本 抽象 通过 工厂 方法 trade 完 成 以 下 工作 : 
(1) 从 外 部 数据 源 接收 数据 
(2) 生成 交易 对 象 ， 对 象 表示 成 Clojure Map 的 形式 





(2) MIR RIEA ITH H tradeR AA T YESEBUS D ELTE BGHEA RRN EITA 

采用 以 下 技巧 : 如 何 将 税 费 数 据 填充 到 交易 中 : 

m 装饰 器 模式 (1) 定义 with-values 函 数 ， 对 tradae 函 数 的 输出 进行 增补 ， 加 入 新 行为 
m Clojure% (2) ERAR TORR R RGA trade PRACT E 


(3) 定义 with-tax-fee 宏 ,该 安 可 将 with-values 多 次 应 用 于 一 个 现 有 
注意 ， with tax-fee 使 用 了 编译 时 元 编程 技术 ， 没 有 额外 的 运行 负担 函数 
net -value 函 数 除了 接收 第 2 步 修改 后 的 trade 函 数 ， 还 将 完成 以 下 工作 : 
(3) 定义 net-valu 函 数 ， 计算 交 易 ”(1) 从 交易 信息 中 取得 基本 价值 
的 现金 价值 (2) 从 交易 信息 中 取得 税 费 数据 
(3) 按照 具体 的 领域 逻辑 计算 现金 净值 




















Clojure 语 言 的 设计 理念 不 同 于 Ruby、Groovy、Java 等 语言 。 尽管 扎 根 在 Java 的 对 象 系统 之 上 ， 
它 的 语言 习惯 却 是 函数 式 的 。Clojure 编 程 不 能 沿用 面 品 对 象 的 思路 。 纵 观 本 市 的 实现 , 我 们 其 实 
并 没有 运用 什么 特 丈 的 技法 来 设计 DSL， 你 看 到 的 全 都 是 目 然 的 Clojure 编 程 风 格 。 

图 5-10 描 绘 了 Clojure DSL 脚 本 的 生命 周期 ， 请 你 多 看 两 眼 ， 加 深 理 解 。 

感觉 疲倦 了 吗 ? 其 实 ， 我 们 还 有 一 件 关 于 Clojure DSL 的 事情 留 着 没 说 ， 那 就 是 Clojure REPL 
( read-eval-print-loop ) 这 个 让 你 能 够 即时 观察 、 调 整 DSL 的 互动 窗口 。 小 蕙 一下， 补充 点 能 量 ， 
接 下 来 是 互动 环 闻 ,， 少 了 活力 可 不 行 。 我 们 会 让 你 直接 与 Clojure 解 释 需 面对面 地 交流 ,实地 运行 
本 节 刚 刚 设 计 好 的 DSL。 
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(一 般 form) e 无 运行 时 额外 负担 
** 无 运行 时 元 对 象 /元 数据 





net-value 


交易 DSL request 
^e. 
decorate ERI : 


(特殊 form ) … 所 有 的 Clojure form 
HEITA ETAD 


— DSL 肢 本 一 > < 一 一 语义 模型 一 一 > < 一 执行 模型 ”一 


图 5-10 ”从 Clojure DSL 脚 本 到 Clojure 执 行 模型 。 留 心 观察 DSL 肢 本 被 执行 之 前 经 历 的 一 系 
列 准备 。 我 们 在 第 1 章 就 提 过 ,语义 模型 是 DSL 脚 本 与 执行 模型 之 间 的 桥梁 


5.4.3 ”通过 REPL 进 行 的 DSL 会 话 


Clojure 等 动态 语言 允许 你 直接 通过 一 个 REPL 界 面 与 语言 运行 时 交互 。( 关于 REPL 的 介绍 请 
阅读 http://en.wikipedia.org/wiki/Read-eval-print loop )。REPL 让 你 实时 观察 DSL， 即 时 修改 其 行为 
并 看 到 修改 的 效果 。 这 项 特性 绝对 是 实现 DSL 无 颖 改进 的 有 力 帮 手 。 

我 们 的 DSL 的 人 简洁 度 和 表现 力 都 达到 了 相当 高 的 水 平 ， 举 例 来 说 ， 用 我 们 的 DSL 表 达 现 金价 
值 的 计算 逻辑 ， 只 需要 写 (net-value (trade request)) 这 么 人 简单 的 一 句 话 。 你 可 以 即时 创 
建 一 笔 交 易 ， 放 在 REPL 里 运行 ， 然 后 修改 tradqe 国 数 ， 以 装饰 器 的 形式 增加 业务 规则 。 下 面 是 
用 我 们 的 DSL 在 Clojure REPL 中 进行 的 一 段 会 话 : 


user (def request {:ref-no "r-123", :account "a-123", 
:instrument "i-123", :unit-price 20, 











:quantity 100) 
t'user/request 


user» (trade request) 
{:ref-no "r-123", :account "a-123", :instrument "i-123", 
:principal 2000, :tax-fees {}} 


user> (with-tax-fee trade 
(with-values :tax 12) 
(with-values :commission 23)) 
#'user/trade 


user> (trade request) 
{:ref-no "r-123", :account "a-123", :instrument "i-123", 
:principal 2000, :tax-fees {:commission 460, :tax 240}} 


user> (with-tax-fee trade 


(with-values :vat 12)) 
t'user/trade 


user» (trade request) 
(:ref-no "r-123", :account "a-123", :instrument "i-123", 
:principal 2000, :tax-fees {:vat 240, :commission 460, :tax 240}} 


user» (net-value (trade request)) 
2940 


好 的 DSL 应 该 对 外 呈现 易于 使 用 、 充 分 体现 领域 语汇 精髓 的 API 界 面 ， 同 时 将 其 复杂 的 实现 
隐藏 在 API 之 后 。 这 是 优秀 DSL 的 决定 性 品质 之 一 。 本 节 的 Clojure REPL 交 互 真 实地 展现 了 DSL 
的 简洁 度 。 我 们 的 DSL 始 终 让 你 觉得 它 处 处 呼应 了 交易 员 的 实际 工作 用 语 ， 虽 然 是 领域 语言 ， 却 
能 刚好 用 Clojure 语 言 来 实现 。 

一 名 合格 的 设计 者 在 学 习 任 何 新 范式 的 时 候 , 都 不 要 忘记 掌握 它 的 缺陷 。 我 们 已 经 讲解 了 不 
少 正面 的 模式 、 惯 用 法 和 最 佳 实践 ， 为 你 指明 DSL 的 实现 道路 。 下 一 节 要 说 说 反面 的 缺陷 ,提醒 
你 避 开 途中 的 险阻 。 





5.5 AW 


一 直 以 来 ,本章 癌 你 展示 的 都 是 正面 的 例子 。 我 们 用 了 三 种 最 流行 的 动态 JVM 语 言 来 讨论 
DSL 的 实现 , 不 但 让 你 见识 了 不 同 语 言 的 各 种 惯用 法 和 实现 技巧 , 还 让 你 亲手 实现 了 符 王 证 券 交 
吻 应 用 领域 的 实用 DSL 脚 本 。 然 而 ,不 管 目 前 进展 得 多 么 顺利 ， 你 终究 会 遇 到 一 些 陷阱 ， 而 有 些 
潜在 的 危险 我 必须 给 你 指出 来 。 

我 特意 为 本 半分 属 三 种 语言 的 例子 选取 了 关系 密切 的 三 个 用 例 。 这 么 做 的 目的 , 是 强调 即使 
问题 相同 , 你 也 应 该 根据 不 同 语言 的 特点 ,选择 不 同 的 解决 手段 。 在 Ruby 实 现 中 适合 用 动态 元 编 
程 来 解决 的 问题 , 使 用 Clojure 时 , 就 不 一 定 能 照搬 Ruby 的 套路 。 你 必须 学 会 选择 正确 的 工具 去 做 
正确 的 事 。 而 恰恰 在 你 选择 的 过 程 当 中 , 很 容 多 冷 不 防 被 津 见 的 陷阱 绊 倒 。 我 们 打算 从 DSL 开 发 
的 角度 讨论 其 中 的 一 些 陷阱 。 


5.5.1 遵从 最 低 复杂 上 度 原 则 


实现 内 部 DSL 的 时 候 ， 应 该 选择 特 主 霹 言 中 最 简单 、 同 时 最 适用 于 解答 域 模型 的 惯用 法 。 我 
们 经 关 可 以 看 到 开发 者 在 不 必要 的 情况 下 选用 元 编程 手段 ,例如 Ruby 的 猴子 补丁 就 是 一 个 被 滥用 
的 典型 。( 还 记得 猴子 补丁 吗 ? 猴子 补 丁 可 以 打开 一 个 类 ， 修 改 其 中 的 方法 和 属性 。 由 于 修改 结 
末 会 作用 于 全 局 ，Ruby 的 猴子 补丁 特别 危险 。) 很 多 时 候 Ruby 模 块 足以 代 答 猴子 补丁 ， 与 其 打开 
一 个 类 并 插入 新 方法 ,不 如 把 方法 放 入 一 个 Module 中 ,然后 有 针对 性 地 将 Module 包 含 进 有 需要 
的 类 中 。 
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y. Pr yRuby DSL 片 段 来 目 5.2.2 人 ， 对 于 程序 员 来 说 ， 这 样 的 语言 已 经 足够 让 人 理解 其 领 
域 语 义 。 
TradeDSL.new.new trade 'T-12435', 


'acc-123', :buy, 100.shares.of('IBM'), 
unitprrice' => 200, 'principal' => 120000, 'tax' => 5000 


表现 力 已 经 够 充分 了 ! 那么 我 们 为 什么 要 继续 开发 解释 器 版 DSL 呢 ? 有 两 个 理由 。 首 先 ， 
我 希望 表现 力 提高 之 后 ，DSL 能 得 到 团队 中 领域 专家 的 认可 。 领 瑾 专家 老 例 是 第 一 位 抱怨 原 乒 
DSL 所 含 非 本 质 复 森 性 的 用 户 ， 解 释 带 版 更 符合 他 平 弟 在 交易 台 前 的 用 语 。 其 次 ， 我 希望 充分 
展示 Ruby 的 动态 性 的 潜力 。 当 你 在 现实 中 真正 设计 DSL 时 , 一 定 要 记 住 表现 力 水 平 应 该 配合 用 
户 的 映 份 。 


5.5.3 ”坚持 优秀 抽象 设计 的 各 项 原则 


经 常会 遇 到 一 些 现实 情况 ,让 你 忍 不 住 想 要 增加 DSL 的 枝 节 去 提高 用 户 的 认同 感 ,结果 往往 
就 违反 了 第 1 章 讨论 过 的 优秀 抽象 的 设计 原则 。 语 言 里 的 歼 词 和 虚 饰 多 了 ， 封 装 就 容易 被 破坏 ， 
实现 的 内 部 细节 也 更 容易 暴露 。 为 提高 DSL 的 表现 力 而 削弱 抽象 的 不 可 变性 , 并 不 一 定 是 划算 的 。 
这 方面 的 取舍 可 以 看 代码 清单 5-5 的 例子 。 我 们 把 Instzrument 抽 象 做 成 可 变 的 , 得 以 将 票据 创建 
逻辑 表达 为 流畅 的 DSL 语 句 。 然 后 在 代码 清单 5-7 中 , 我 们 进一步 利用 抽象 的 可 变性 提高 DSL 的 表 
现 力 。 

这 里 的 告诫 并 不 是 让 你 放弃 对 表现 力 的 追求 。 请 你 记 住 , 语言 设计 是 一 种 充满 了 取舍 和 妥协 
的 工作 。 任 何 决策 、 对 抽象 设计 原则 的 任何 让 步 ， 都 应 该 经 过 审慎 评 估 。 对 设计 原则 的 调整 ， 也 
应 该 以 DSL 目 标 用 户 的 身份 背景 为 标杆 。 















































5.5.4 ”避免 语言 间 的 摩擦 


按照 一 般 的 认识 , 不 同 的 DSL 不 能 组 合 使 用 。 一 种 DSL 总 是 针对 一 个 专门 的 领域 。 你 在 设计 
交易 系统 的 DSL 时 ， 总 是 以 建 模 领域 为 参照 去 调整 其 表达 方式 。 至 于 如 何 与 帐 务 明细 DSL 、 投 资 
组 合 管理 DSL 之 类 的 第 三 方 DSL 集 成 ， 你 根本 想 不 了 那么 多 。 

虽然 你 无 法 预料 一 切 情 况 , 但 设计 中 还 是 应 该 尽量 提高 抽象 的 组 合 能力 。 上 数 天 生 比 对 象 容 
易 组 合 。 如 果 你 的 实现 语言 支持 Ruby、Groovy、Clojure 中 的 高 阶 函 数 ， 那 么 应 该 把 设计 重点 放 
在 组 合子 的 串联 上 , 通过 组 合子 之 间 的 联系 ， 明 然 凝聚 为 语言 的 脉络 。 可 组 合 的 抽象 具有 诸多 优 
点 ， 有 利于 并 发 ， 具 体 的 讨论 请 查阅 附录 A。 

如 有 果 你 的 抽象 不 能 组 合 ，DSL 就 成 了 一 盘 散 沙 。 语 言 成 分 一 个 个 扳 立 肴 雪 沙 不 成 句 ， 领 域 用 
户 又 怎么 可 能 用 得 上 自然。 

以 上 就 是 DSL 设 计 中 最 容易 踩 中 的 几 个 陷阱 ,务必 加 以 注意 。 从 声言 中 挑选 哪 一 部 分 子 集 用 
于 DSL 实 现 ， 是 极端 重要 的 设计 决策 。 你 要 时 时 记 住 DSL 的 集成 需求 ， 始 终 导 重 优 秀 抽 象 的 设计 
原则 。 
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5.6 h 


SUPERI 用 动态 类 型 语言 实现 内 部 DSL 的 长 篇 讨论 就 要 结束 了 。Ruby、Groovy 和 Clojure 语 言 
作为 JVM 平 台 语 言 多 样 性 的 代表 ， 被 我 选 为 讲解 用 的 实现 语言 。 
JRuby 是 Ruby 语 言 的 Java 实 现 ， 充 当 了 Ruby 语 言 与 Java 对 象 模型 互 操作 的 桥梁 。 它 既 有 Ruby 
的 强大 元 编程 能 力 ， 又 得 益 于 Java 的 互 操作 性 。Groovy 语 言 本 身 就 被 当做 一 种 Java DSL， 与 Java 
共用 相同 的 对 象 模 型 。Clojure 语 言 虽 然 也 建立 在 Java 的 对 象 模 型 之 上 ， 却 提供 了 Lisp 那 种 强烈 的 
PRG RUPEE TU, IA o 
本 曹 引导 你 使 用 以 上 三 种 语言 实现 了 和 奉 干 典型 现实 的 交易 系统 用 例 ,Ruby 的 元 编程 能 力 强 ， 
可 以 使 DSL 在 运行 时 保持 动态 ,所 以 你 可 以 组 织 建造 高 阶 抽 和 象 .Groovy 的 运行 时 能 力 与 Ruby 相 似 ， 
但 它 与 Java 的 互 操 作 更 严 丝 合 颖 ， 毕 竟 两 者 共享 同一 个 对 象 模型 。 
我 们 从 第 2 章 开 始 设计 的 指令 处 理 DSL 迎 来 了 用 Groovy 语 言 实现 的 最 终 版 本 。 通过 这 个 例子 ， 
你 应 该 了 解 了 一 般 DSL 的 增 量 式 演进 的 迭代 过 程 。Clojure 是 运行 在 JVM 上 的 Lisp 语 言 ， 拥 有 出 类 
拨 鞭 的 编译 时 元 编程 能 力 , 也 就 是 所 谓 的 宏 。 你 学 习 了 如 何 运 用 宏 来 提高 DSL 的 表现 力 和 简洁 度 ， 
并 且 知 道 它 不 会 像 其 他 语言 的 元 对 象 协 议 那 样 增加 运行 时 的 负担 。 
最 后 ,只 要 你 能 记 住 每 个 设计 诀 条 意味 看 哪些 妥协 和 代价 , 肯定 能 做 好 DSL 的 设计 。, 说 到 压 ， 
语言 设计 工作 就 是 要 检验 你 能 不 能 在 表现 力 和 实现 代价 之 间 找 好 平衡 。 对 于 DSL 来 说 ,， 它 充当 春 
开发 者 和 领域 专家 之 间 沟 通 渠道 的 角色 ， 因 此 能 充分 传达 代码 的 意图 才 是 最 根本 的 追求 。 























要 点 与 最 佳 实践 

口 设计 内 部 DSL 时 应 该 掌握 所 有 的 Ruby 元 编程 手段 ,不 要 忘记 元 编程 有 代码 复杂 性 和 性 能 
两 方面 的 代价 。 

口 优先 选用 Groovy Category 代 替 ExpandoMetaclass 来 控制 元 编程 的 作用 域 。 

口 Ruby 的 猴子 补丁 很 吸引 人 , 但 它 作 用 于 全 局 命名 空间 。 在 DSL 实 现 中 使 用 猴子 补丁 时 要 
三 思 而 后 行 。 

口 Clojure 虽 然 在 Java 平 台 上 实现 , 却 是 一 种 函数 式 语 言 。Clojure DSL 的 设计 应 该 围绕 领域 
函数 进行 。 充 分 发 挥 函 数 式 编程 的 长 处 ， 运 用 高 阶 函 数 和 闭 包 来 设计 DSEL 的 语义 模型 。 


与 三 种 最 流行 、 最 动态 的 JVM 语 言 结 伴 同 行 的 DSL 设 计 之 旅 到 了 终点 。 经 过 这 番 历 练 ， 想必 
你 已 经 对 实现 DSL 的 各 种 惯用 手法 有 了 基本 的 概念 。 能 否 选 择 符 合 语言 习惯 的 正确 实现 方 宁 ， 对 
开发 工作 有 着 决定 性 的 影响 , 你 选择 的 方案 决定 了 DSLAPI 的 表现 力 水 平 。 学 习 完 本 章 , 你 对 DSL 
开发 的 掌握 程度 义 上 了 一 个 台阶 ， 具 备 了 深入 探 过 Ruby、Groovy 和 和 Clojure 语 言 各 目 实 现 技 巧 的 
基础 。 

下 一 半 我 们 将 跨 过 隔 开 类 型 系统 两 大 阵营 的 那 道 党 人 多， 从 男 一 端 着 眼 ,观察 静态 类 型 会 逆 
出 什么 样 的 DSL 实 现 。 每 着 你 的 还 有 充满 趣味 的 练习 一 一 用 Scala 语 言 开发 内 部 DSL。 
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Scala 语 言 中 的 内 部 
DSL 设 计 


本 章 内 容 

O »xfScalais zi sr B4 Z8 

口 HjScalais zi JT VJSRDSL 
a 组 合 多 个 DSL 

口 运用 Monad 化 结构 


以 DSL 了 驱动 的 开发 方式 有 其 拉 长 和 不 撞 长 的 方面 ， 前面 几 章 说 了 不 少 。 现在 你 肯定 已 经 认识 
到 ， 对 于 应 用 中 反映 业务 规则 的 部 分 ，DSL 能 非常 有 效 地 玻 通 开发 团队 与 领域 专家 团队 的 沟通 洪 
道 。 上 一 章 讨论 了 使 用 几 种 动态 JVM 语 言 担 当 内 部 DSL 箱 主 的 能 力 。 这 一 革 要 介绍 的 是 一 种 非常 
具有 这 方面 潜力 的 静态 JVM 语 言 一 一 Scala。 

本 章 继续 重点 讨论 具体 的 实现 , 直接 与 编程 相关 的 实践 性 内 容 将 占据 较 大 篇 幅 。 我 们 首先 论 
证 Scala 语 言 是 一 种 称职 的 内 部 DSL 箱 主语 言 ， 然 后 在 真实 的 DSL 设 计 中 检验 这 个 结论 。 图 6-1 是 
本 和 草 讨 论 进程 的 路 线 网 。 








介绍 Scala 语 言 在 DSL 
开发 方面 的 实力 组 合 多 种 DSL 





实践 Scala 语 言 的 DSL 开 发 使 用 Monad 化 结构 设计 简 活 的 DSL 
。 领域 抽象 
e. 领域 规则 
e 各 种 模式 


图 6-1 ”本章 路 线 图 
6.1 广 和 6.2 廊 将 确立 Scala 作 为 DSL 箱 主 的 资格 。 在 此 之 后 ， 我 们 丈 证 券 交 易 后 从 系统 中 的 真 
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实用 例 展开 详细 讨论 。6.3 节 和 6.6 节 会 实际 演练 许多 惯用 法 、 最 佳 实践 和 模式 。6.7 节 讨论 如 何 将 
多 种 DSL 组 合成 更 大 规模 的 语言 。 本 章 最 后 介绍 Monad 在 DSL 设 计 中 的 作用 ， 它 能 塑造 出 简洁 、 
带 有 因数 式 风格 、 富 有 表现 力 的 DSL。 

学 完 本 章 , 你 将 全 面 掌握 如 何在 Scala 这 种 宿主 语言 中 设计 DSL。 你 会 学 到 如 何 建 模 领域 组 件 ， 
然后 围绕 它们 建立 简单 易 用 、 语 义 丰满 的 语言 抽象 ， 熟 悉 这 方面 的 惯用 法 和 最 佳 实践 。 怎 么 样 ， 
想 学 吗 ? 我 们 开始 吧 。 


本 草 代 码 片 段 都 以 Scala 2.8 版 本 为 准 。 不 熟悉 Scala 语 法 的 读者 可 以 参阅 附录 D 的 
Scala 语 法 速 查 表 。 





6.1 为 何 选择 Scala 


Scala 同 面 回 对 象 语言 一 样 ， 拥 有 丰富 全 面 的 抽象 机 制 ， 塑 造 了 DSL 的 简洁 度 和 表现 力 。DSL 
不 能 脱离 其 实现 模型 而 独立 存在 ,我 们 说 过 ，DSL 是 田 在 实现 模型 外 面 的 一 层 门 面 。 本 章 将 分 析 
Scala 发 展 为 宿主 语言 的 历程 ， 围 绕 设 计 底层 模 型 和 外 层 DSL 两 方面 展开 。 表 6-1 列 举 了 了 Scala 常用 
于 DSL 设 计 的 一 些 代 表 性 语言 特性 。 


表 6-1 用 于 DSL 设 计 的 代表 性 Scala 特 性 











语言 特性 Scala 的 具体 做 法 

灵活 的 语法 Scala 的 表层 语法 简练 ， 有 许多 手段 可 使 DSL 更 贴近 真实 的 领域 用 语 
例如 : 
m 可 省 略 方法 调用 的 点 符号 
m 分 号 推 靳 


m 中 级 运算 符 
m 可 省 略 方 法 调用 的 圆 括号 
可 扩展 的 对 象 系统 Scala 是 面 问 对 象 的 。 它 与 Java 使 用 相同 的 对 象 模型 ， 然 后 利用 上 自身 先进 的 类 型 系统 ， 在 
很 多 方面 进行 了 扩展 
Scala 的 对 象 语义 : 
m trait 的 用 途 是 基于 mixin 的 实现 继承 ( 见 6.10 廊 文献 [12] ) 
m 抽象 类 型 成 员 和 泛 型 类 型 参数 这 两 项 语言 特性 都 可 以 使 类 具有 正 交 扩展 能 力 ( 056.10 
节 文 献 [13] ) 
m 通过 有 自 类 型 标注 ( self-type annotation ) 对 抽象 的 正 交 扩展 进行 约束 ( 见 6.10 节 文献 [14] ) 
m Case 类 的 用 途 是 实现 值 对 象 " 
函数 式 编 程 能 力 Scala 是 一 种 多 范式 的 编程 语言 ， 结 合 了 面 回 对 象 和 六 数 式 编 程 的 语言 特性 
为 何 采 取 面 向 对 象 与 函数 式 相 结合 的 方式 ? 
m Scala 中 的 子 数 是 第 一 类 值 ， 从 类 型 系统 层面 开始 ， 就 支持 高 阶 函 数 。 用 户 可 将 自 定 义 
DSL 控 制 结构 写成 闭 包 ， 然 后 当做 一 般 的 数据 类 型 传递 
m 在 纯粹 的 面 回 对 象 语言 中 ,一切 事 物 都 要 套 入 类 的 设计 形式 ， 不管 它 本 来 的 领域 食 义 应 
该 是 名 词 还 是 动词 。Scala 混 合 了 面 癌 对象 与 范 数 特性 ， 更 有 利于 模型 贴近 问题 域 的 语义 
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(2E) 
语言 特性 Scala 的 具体 做 法 
静态 检查 Scala 通 过 结构 化 类 型 定义 (structural types， 见 6.10 节 文献 [2] ) 支持 鸭子 类 型 
BISTRA 与 Ruby 了 鸭子 类 型 的 差别 : 
Scala 的 鸭子 类 型 是 静态 检查 的 
限定 了 词法 作 Scala 通 过 它 的 implicit 语 言 结构 取得 开放 类 的 效果 ，3.2 节 的 补充 内 容 “Scala implicits” 中 有 
用 域 的 开放 类 相关 介绍 
与 Ruby 猴 子 补 丁 的 差别 : 
Scala 的 implicits 结 构 有 词法 作用 域 的 限制 ; 通过 隐 式 转换 方式 添加 的 行为 , 需要 明确 导入 具 
体 的 词法 作用 域 才 生效 ( 详 见 6.10 市 文献 [2] ) 
隐 含 参数 API 调 用 中 可 以 省 略 部 分 参数 ， 让 编译 器 去 推 新 。 这 样 做 可 以 精简 语法 ， 提 高 DSL 脚 本 的 可 
读 性 
模块 化 的 对 有 独特 的 对 象 概念 ， 可 用 来 定义 具体 的 DSL 模 块 。 你 可 以 将 一 些 DSL 结 构 定义 为 抽象 成 员 ， 
象 组 合 方式 推迟 进行 具体 实现 


[1] 普通 类 和 case 类 的 主要 区 别 在 于 ，case 类 的 构造 函数 调用 更 加 简单 ， 可 以 使 用 默认 的 相等 性 语义 ， 以 及 支持 模式 匹配 。 

这 些 特性 汇集 在 一 起 , 使 Scala 成 为 一 种 非常 适用 于 内 部 DSL 设 计 的 JVM 语 言 。 不 过 它 毕 苋 是 
一 种 新 语言 ， 难 免 令 人 犹 职 。 在 团队 里 引入 一 种 新 语言 ， 从 技术 和 文化 方面 来 说 ,部 是 很 大 的 挑 
战 。 公 司 可 能 已 经 在 JVM 平 台 上 投入 巨大 资源 ， 相 当 数 量 的 客户 应 用 也 运行 于 Java 平 台 ， 程 序 员 
群体 也 花费 了 无 数 精力 去 熟悉 各 式 各 样 的 Java 框 架 。 你 能 为 了 迎接 一 种 新 的 编程 语言 ， 而 放弃 多 
年 的 积 素 吗 ? 华 好 ，Scala 人 允许 你 循序 渐进 地 完成 转换 。 请 看 下 一 让 。 




















6.2 3B[8] Scala DSL 的 第 一 步 


Scala 是 一 种 很 好 的 内 部 DSL 和 宿主 语言 ， 但 单 赁 这 一 点 不 足以 说 服 经 理 在 开发 环境 中 引入 
Scala 这 种 新 技术 。 任 何 新 技术 都 要 控制 引入 的 节 雪 ,以 免 增 加 混乱 的 风险 。 一 般 可 以 先 在 不 太 天 
键 的 业务 上 采用 ， 再 慢 慢 普 

置 刁 于 JVM 之 上 ， 拥 有 与 Java 互 操作 的 能 力 ， 这 是 Scala 的 重要 优势 。 企 业 可 以 一 边 保留 Java 
方面 的 投入 ， 一边 癌 Scala 过 渡 。Scala DSL 的 第 一 步 可 以 有 很 多 走 法 ， 在 保持 基本 Java 抽 和 象 不 变 
的 前 提 下 ， 已 经 有 不 少 发 挥 空间 。 图 6-2 给 出 了 一 些 策略 ， 可 以 供 你 的 开发 团队 参考 。 

(项 目的 交付 主线 沿用 Java) 

















通过 Scala DSL 


测试 Java 对 象 用 Scala DSL 建 模 非 关键 功能 


用 Scala DSL 包 装 Java 对 象 
图 6-2 Scala 不 需要 一 开始 就 应 用 到 生产 代码 之 中 。 这 里 列举 了 一 些 学 
步 的 方案 ， 选 择 何 种 顺序 你 说 了 算 


142 第 6 章 ”Scala 语言 中 的 内 部 DSL 设计 





从 图 6-2 中 可 以 看 出 , 项 目的 交付 主线 可 以 继续 沿用 Java, 团队 中 的 部 分 成 员 在 辅助 性 工作 中 
接触 Scala。 下 面 几 节 将 话 细 次 明 图 中 的 儿 种 起 步 方式 。 


6.2.1 通过 Scala DSL 测 试 Java 对 象 


测试 是 开发 过 程 中 的 核心 任务 之 一 , 同时 它 的 技术 和 框架 都 有 很 大 的 选择 空间 。 测试 套件 的 
重要 性 不 亚 于 生产 代码 库 。 业 内 人 土 正 竭尽 全 力 ,， 希望 将 测试 套件 表达 得 更 到 位 、 更 详尽 。 

DSL 已 经 成 为 测试 框架 必 不 可 少 的 一 部 分 。 你 只 要 选择 一 种 基于 Scala DSL 的 测试 框 染 ， 就 
能 立即 开始 学 习 用 Scala 语 言 设计 DSL。 例如 ScalaTest ( 见 6.10 节 文献 [8] ) 就 是 这 样 一 种 DSL 框 染 ， 
你 可 以 用 它 编 写 DSL， 对 Java 和 Scala 类 进行 测试 。 一 开始 并 不 要 求 你 掌握 Scala 类 的 写法 ,只 要 在 
这 类 测试 框架 内 重用 原 有 的 Java 类 即 可 ， 明 的 是 熟悉 一 下 其 于 DSL 的 开发 方式 和 环境 。 




















6.2.2 ”用 Scala DSL 作 为 对 Java 对 象 的 包装 


本 书 一 再 提 及 Scala 与 Java 的 完美 契合 ,我 们 可 以 利用 S$Scala 的 这 个 特点 ， 为 Java 对 象 加 上 一 层 
包装 ， 获 得 更 灵巧 、 丰 满 的 表达 。3.2.2 节 可 作为 这 种 手法 的 实证 ,我 们 借助 Scala 的 力量 ， 把 Java 
对 象 打扮 成 一 副 精 明 能 干 的 样子 , 是 相当 有 说 服 力 的 。 通 过 对 这 种 手法 的 实践 ， 你 将 掌握 如 何 运 
用 Scala 语 言 在 Java 对 象 模 型 上 创作 DSL， 这 是 一 条 简单 高 效 的 学 习 途 径 。 


6.2.3 ”将 非 关 键 功能 建 模 为 Scala DSL 


大 型 应 用 背包 含 一 些 不 太 关 键 的 部 分 。 你 可 以 跟 客 户 协商 ， 把 其 中 一 些 次 要 部 分 作为 Scala 
DSL 设 计 的 试验 田 。 如 果 不 愿 意 放 弃 主 要 的 Java 编 译 模式 ， 那 么 可 以 把 Scala DSL 做 成 脚本 ， 然 后 
通过 Java 6 提供 的 scriptEngine 来 运行 。 

下 面 详 述 Scala 各 项 特性 的 具体 用 法 ， 深 入 探讨 怎样 用 它们 建立 领域 模型 ， 然 后 编排 成 流畅 
的 DSL。 

















代码 提示 “后面 的 段落 含有 大 量 代码 片段 ， 我 会 插入 对 一 些 预 备 知 识 的 说 明 ， 解 释 必 要 的 语言 
特性 ， 以 便 读 者 理解 实现 中 的 细微 之 处 。 如 有 需要 ， 还 可 以 查阅 本 书 附录 中 相应 语 
言 的 速 查 表 。 





讨论 中 将 继续 沿用 金融 中 介 领 域 的 例子 ， 逐步 应 用 不 同 的 特性 去 修补 和 改 恨 DSL 的 设计 ,最 
后 形成 一 种 可 以 交付 使 用 的 完善 DSL。 这 段 旅程 将 充满 乐趣 。 


6.3 正式 启程 


本 章 所 需 的 背景 知识 你 已 经 了 解 得 差不多 了 ，, 我 们 回 到 正题 。 本 章 将 研究 证 券 区 易 领 域 的 各 
种 现实 用 例 ， 观 察 在 Scala 实 现 语言 的 作用 下 ， 如 何 将 用 例 转 化 为 生动 的 DSL。 
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我 选择 的 用 例 跟 之 前 讨论 Ruby、Groovy 实 现时 的 用 例 差不多 。 这 样 你 把 前 后 的 例子 互相 对 
照 ， 就 不 难看 出 其 中 思路 的 变化 。 即 使 问题 域 相同 ， 静态 类 型 语言 和 动态 语言 的 DSL 设 计 思 路 也 
截然 不 同 。 首 先 我们 了 人 解 一 下 Scala 有 哪些 特性 可 以 提升 DSL 语 法 的 表现 力 。 














1 Scala 知 识 点 
口 Scala 语 言 的 面向 对 象 特性 。Scala 的 类 和 继承 结构 有 多 种 设计 方式 。 
口 Scala 语 言 拥 有 类 型 推断 特性 ; 它 的 运算 符 等 同 于 方法 ; 语法 灵活 ,可 省 略 圆 括号 和 分 号 。 
a RTE (immutable variable ) 有 利于 设计 函数 式 的 抽象 。 
口 Scala 语 言 的 case 类 和 case 对 象 ， 其 特点 适用 于 设计 不 可 变 的 值 对 象 。 
口 Scala 的 trait 特 性 ， 可 用 于 设计 mixin 和 多 继承 。 


6.3.4. 语法 层面 的 表现 力 


一 门 语言 的 语法 是 军 于 表现 力 还 是 党 元 拖 稍 ， 只 有 一 线 之 隔 。 非 程序 员 用 户 和 党 得 表现 充分 的 
语法 ， 程 序 员 可 能 就 觉得 烦琐 到 了 极点 。5$.2.3 节 为 交易 DSL 设 计 Ruby 解 释 锅 时 就 说 过 这 个 问题 。 
还 记得 2.1.2 节 老 饱 的 抱怨 吗 ? Java 给 指令 处 理 DSL 强 加 了 一 些 不 必要 的 语法 复杂 性 ， 老 饱 很 有 意 
见 。Scala 虽 然 也 和 Java 语 言 一 样 是 静态 类 型 的 , 但 它 对 外 呈现 了 较为 精简 的 表面 语法 ， 可 以 减少 
对 DSL 的 干扰 。 代 码 清 单 6-1 展 示 了 一 段 常见 的 Scala 代 码 ， 它 的 功能 是 将 cl1ientAccount 对 象 放 
人 已 存在 的 一 个 账户 列表 。 


代码 清单 6-1 ”Scala 的 语法 兼 具 表现 力 和 简洁 性 

















val al = ClientAccount(no = "acc-123", name = "John J.") 
val a2 = ClientAccount(no = "acc-234", name = "Paul M.") e 命名 参数 和 默认 参数 
val accounts = List(al, a2) 
e 类 型 推断 
val newAccounts - 
ClientAccount(no = "acc-345", name = "Hugh P.") :: accounts p 
M^ E JN 
newAccounts drop 1 <0 可 省 略 的 圆 括号 i EAE TAA 


BEREDAR Scala zi, BEES PROBE FEE Vs 66-251 HB LURRE E ZEE RS ft 
明 的 关键 因素 。 
表 6-2 ”使 Scala 语 法 简洁 的 各 项 特性 ， 以 代码 清单 6-1 为 参照 


Scala 的 简洁 性 来 源 对 DSL 设 计 的 影响 
H ZEB RIA E Scala 与 Java 不 同 , 不 要 求 在 语句 间 加 上 分 写作 为 分 隔 符 ， 直 接 降低 了 对 DSL 语 法 的 干扰 








命名 参数 和 默认 参数 ClientAccount 类 实例 化 时 @ 用 了 命名 参数 。 该 类 被 声明 为 case 类 ( 见 代 人 码 清单 6-3 ) ， 
所 以 其 对 象 的 构造 语法 较为 简便 。 还 有 部 分 参数 因为 已 经 在 类 定义 中 设置 了 殉 认 值 ， 所 
以 实例 化 时 可 以 不 用 写 出 来 。 命 名 参数 和 稚 认 参数 对 于 提高 DSL 脚 本 的 可 读 性 有 很 大 玫 助 
类 型 推断 用 多 个 账户 对 象 组 成 列表 时 ， 不 需要 指定 结果 列表 的 类 型 @@， 编 详 天 会 帮 你 推 膝 
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( 续 ) 
Scala 的 简洁 性 来 源 对 DSL 设 计 的 影响 
运算 符 等 同 于 方法 我 们 通过 :: 运 算 符 向 accounts 列 表 增 加 一 个 clientaAccount 对 象 上 。 实 际 上 等 同 于 在 
List 实 例 上 调用 方法 ， 即 accounts . ::(ClientAccount(no = "acc-345", name = 
"Hugh P.")). 写成 运算 符 的 形式 ， 同 时 省 上 略 点 号 ( . )， 这 两 项 措施 大 大 提升 了 代码 
片段 的 可 读 性 
可 省 略 圆 括号 我 们 调用 List 类 的 drop 方 法 从 列表 中 删 去 第 一 个 账户 @。 此 处 代码 省 略 了 辆 括号 ， 更 


贴近 一 般 的 阅读 习惯 





本 市 讨论 的 只 是 一 些 纯 语法 层面 的 表面 因素 。 还 有 其 他 特性 同样 对 Scala 语 法 的 可 读 性 起 了 正 
面 的 作用 , 包括 它 强 大 的 集合 字面 量 语 法 、 人 允许 用 闭 包 作为 控制 抽象 等 特性 ,也 包括 隐 含 参数 等 
局 级 特性 。 本 革 将 未 一 介绍 这 些 特性 ， 讨 论 它们 各 目 在 内 部 DSL 设 计 中 的 作用 。 

为 了 给 后 面 的 DSL 打 好 基础 ,现在 我 们 需要 看 手 准 备 一 些 基 本 的 领域 抽象 。 我 们 的 抽象 仍然 
出 日 前 面 儿 鞋 打 过 不 少 交 违 的 证 券 交 易 领 域 。 一 方面 不 至 于 浪费 前 面 学 到 的 领域 概念 ,为 一 方面 
也 便于 在 对 比 中 学 习 各 种 语言 的 不 同 实 现 惯例 。 














6.3.2 ”建立 领域 抽象 


设计 Scala DSL 时 ， 通 党 需要 有 一 个 对 象 模型 作为 基本 抽象 屋 。 然 后 运用 子 类 型 化 手段 ， 实 
现 各 种 模型 组 件 的 特 化 ， 表 将 它们 与 解答 域 中 符合 条 件 的 mixin 组 合 起 来 ， 构 成 更 大 型 的 抽象 。 
模型 中 的 操作 可 通过 函数 抽象 来 表示 ， 然 后 用 组 合子 来 组 织 它 们 。 图 6-3 说 明了 Scala 抽 和 象 实 现 扩 
展 性 的 方式 ， 它 利用 了 Scala 羔 具 面 向 对 象 和 函数 式 功能 双重 优势 的 特点 。 

















从 类 型 和 值 的 
角度 进行 抽象 
(面向 对 象 ) 
通过 trait 实 现 mixin 
以 子 类 型 化 方 | 
式 进行 特 化 n 
组 合成 模块 
方法 + 闲 包 + 组 合子 = VA 
功能 丰富 的 函数 式 抽象 (HRA) 


图 6-3  Scala3f R MMX 2 RE RRR EDE, MAA HIT fex UASUM . 35 HScalalt Ifi 
问 对 象 特性 , 可 以 从 类 型 和 值 的 角度 进行 抽象 ， 以 子 类 型 化 的 方式 特 化 一 个 组 件 , 然后 通 
过 mixin 进 行 组 合 。 而 在 函数 式 特性 这 边 ，Scala 给 你 准备 了 高 阶 函 数 、 闭 包 、 组 合子 等 工 
具 。 最 后 ， 可 以 用 模块 将 两 方面 的 成 果 合 并 起 来 ， 得 到 最 终 的 抽象 
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要 构建 交易 DSL 的 实现 ， 首 先 从 建立 问题 域 的 基本 抽象 开始 。 

1. 证 券 

代码 清单 6-2 是 对 Instrument 的 抽象 , 也 就 是 对 证 券 交 易 所 中 买卖 的 证 券 进行 建 模 。 代码 中 
首先 定义 Instrument 的 一 般 接 口 然后 针对 Equi ty 类 型 以 及 几 种 FixedIncome 类 型 的 证 券 进 
行 特 化 。( 如 果 需 要 了 解 各 种 证 券 类 型 的 异同 ,请 查阅 4.3.2 市 的 补充 内 容 。) 


代码 清单 6-2 ”Instrument 的 Scala 模 型 


package api 





import java.util.Date 


import Util._ 9 几 个 单 例 对 象 
sealed abstract class Currency(code: String) 

case object USD extends Currency("US Dollar") 

case object JPY extends Currency("Japanese Yen") 

case object HKD extends Currency("Hong Kong Dollar") 


trait Instrument { 
val isin: String 


j mixin 式 继承 


case class Equity(isin: String, dateOfIssue: Date = TODAY) 
extends Instrument 


trait FixedlIncome extends Instrument { 
def dateOfIssue: Date 
def dateOfMaturity: Date 
def nominal: BigDecimal 


} 


case class CouponBond( 
override val isin: String, 
override val dateOfIssue: Date - TODAY, 
override val dateOfMaturity: Date, 





val nominal: BigDecimal, 

val paymentSchedule: Map[String, BigDecimal]) 
extends FixedIncome 

case class DiscountBond( 

override val isin: String, 

override val dateOfIssue: Date - TODAY, 

override val dateOfMaturity: Date, 

val nominal: BigDecimal, 

val percent: BigDecimal) 
extends FixedIncome 


领域 语汇 在 上 面 的 实现 中 表达 得 很 清晰 ， 而 旦 领域 模型 基本 没有 受到 偶发 复杂 性 的 干扰 。 
(关于 偶发 复杂 性 的 详细 讨论 请 参阅 附录 A。) 这 是 本 章 建立 的 第 一 个 领域 模型 ， 我 们 不 妨 在 它 时 
上 多 下 一 些 功夫 ， 看 看 哪些 Scala 特 性 对 模型 的 表现 力 和 简洁 性 有 所 贡献 。 
O 3-45 (singleton) 对 象 ， 因 为 它 只 实例 化 一 次 的 特点 ， 此 处 被 用 于 实现 currency 类 @ 的 
几 个 特 化 实体 。 单 例 对 象 是 Scala 语 言 实现 Singleton 模 式 ( 参见 6.10 节 文献 [3] ) 的 方式 ， 弥 
秆 了 Java 硬 言 中 静态 成 员 的 所 有 不 足 。 
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OQ 在 trait 的 组 织 下 ， 通 过 继承 @ 来 实现 一 种 可 扩展 的 对 象 层 次 关系 。 

口 case 类 具有 简化 的 构造 函数 调用 形式 。 

我 们 还 要 再 构建 儿 个 抽象 才能 开始 编写 DSL 脚 本 。 

2. 账 尸 和 交易 

代码 清单 6-3 是 Account 模 型 的 Scala 实 现 。 客 户 与 中 介 在 Account 这 个 领域 实体 上 交易 各 种 
证 券 。 
代码 清单 6-3 ”Account 模型 的 Scala 实 现 


package api 





abstract class AccountType(name: String) 
case object CLIENT extends AccountType("Client") 
case object BROKER extends AccountType("Broker") 


import Util. 
import java.util.Date 


abstract class Account(no: String, name: String, openDate: Date) { 
val accountType: AccountType 


private var closeDate: Date — 
var creditLimit: BigDecimal = 100000 


L EE EE > + Zum JE 
def close(date: Date) = { E 设置 默认 信用 额度 
closeDate = date 


} 


case class ClientAccount(no: String, name: String, 
openDate: Date - TODAY) 
extends Account (no, name, openDate) { 
val accountType = CLIENT 
j 
case class BrokerAccount(no: String, name: String, 
openDate: Date - TODAY) 
extends Account (no, name, openDate) { 
val accountType - BROKER 
Í 


KE T Account Instrument AW, RKA DW m x^ eur ACA Z4 ER s 


代码 清单 6-4 ”Trade 模 型 的 Scala 实 现 
package api 
import java.util.Date 


trait Trade { 
def tradingAccount: Account 
def instrument: Instrument 
def currency: Currency 
def tradeDate: Date 
def unitPrice: BigDecimal 
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def quantity: BigDecimal 
def market: Market 
def principal = unitPrice * quantity 


var cashValue: BigDecimal = . 
var taxes: Map[TaxFee, BigDecimal] = . 


} 


trait FixedIncomeTrade extends Trade { 
override def instrument: FixedIncome 
var accruedInterest: BigDecimal = . 


} * `~ ` L3 EA 
黎 盖 方法 ， 特 化 返回 类 型 
trait EquityTrade extends Trade { 


override def instrument: Equity 


j 

按照 交易 证 券 所 属 的 类 ,我 们 定义 了 两 种 类 型 的 交易 。 稍 后 你 会 了 解 ,这 两 种 类 型 的 交易 具 
有 不 同 的 特征 ， 尤 其 是 现金 价值 的 计算 方法 很 不 一 样 。( 关于 交易 的 现金 价值 请 参阅 4.2.2 节 的 补 
充 内 容 。) 代码 清单 6-4 还 有 一 点 值得 注意 ,我 们 覆盖 了 ijnstrument 方 法 @， 让 它 的 返回 类 型 正 
确 地 反映 每 一 类 交易 所 针对 的 证 券 类 型 。 

我 们 仅仅 为 编写 交易 创造 DSL 而 设置 相关 上 下 文 就 已 经 写 了 这 么 多 代码 , 下 一 下 该 正式 动笔 
了 。 顺 便 还 要 谈 谈 构建 中 用 得 上 的 Scala 特 性 。 
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d — In AZ MES Ss. 再 去 人 研究 它 是 怎么 形成 的 。 所 以 暂时 别管 具体 怎么 实现 ， 先 看 
看 我 们 的 交易 DSL 怎 么 创建 新 交易 : 
val fixedIncomeTrade = 


200 discount bonds IBM 
for client NOMURA on NYSE at 72.ccy(USD) 

















val equityTrade - 
200 equities GOOGLE 
for client NOMURA on TKY at 10000.ccy(JPY) 


第 一 项 定 X.fixedInc omeTrade 创 建 了 一 个 FixedIncomeTrade 的 实例 , 为 客户 帐号 NOMURRA 
在 纽约 证 券 交 易 所 (NYSE ) 按 72 美 元 的 单价 来 人 200 张 IBM 的 折价 债券 (DiscountBona ). 

第 二 项 定义 equityTrade 创 建 了 一 个 EquityTrade 的 实例 , 为 客户 帐号 NOMURA 在 东京 证 券 
交易 所 (TKY ) 按 10 000 日 元 的 单价 卖 出 200 股 Google 的 股票 。 


1 Scala 知 识 点 
O 隐 含 参数 (implicit parameter )。 用 户 没 有 明确 指定 时 ， 隐 含 参数 由 编译 器 自动 提供 。 特 
别 适 用 于 设计 精简 的 DSL 语 法 。 
口 隐 式 类 型 转换 是 实现 “限制 了 词法 作用 域 的 开放 类 ”的 秘诀 。 这 种 开放 类 近似 于 Ruby 
的 猴子 补丁 ， 但 比 猴子 补丁 更 好 用 。 
口 命 名 参数 和 默认 参数 用 在 Builder 模 式 的 实现 当中 ， 可 以 省 略 不 少 拖泥带水 的 代码 。 
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如 果 不 走 DSL 的 路 线 ， 而 是 按照 一 般 的 API 设 计 方 式 ， 通过 某 个 具体 类 的 构造 函数 来 完成 交 
易 创 建 过 程 ， 那 么 代码 差不多 会 是 下 面 这 样 。 代 码 清 单 6-5 先 给 出 FixedIncomeTrade 的 具体 实 
现 ， 然 后 演示 了 它 的 实例 化 过 程 。 


代码 清单 6-5 FixedIncomeTrade 的 实现 和 实例 化 示例 
package api 


import java.util.Date 


import Util. 
实现 FixedIncomeTrade trait 
case class FixedIncomeTradeImpl ( 


val tradingAccount: Account, 

val instrument: FixedIncome, 

val currency: Currency, 

val tradeDate: Date - TODAY, 

val market: Market, 

val quantity: BigDecimal, 

val unitPrice: BigDecimal) extends FixedIncomeTrade 

u 实例 化 示例 

val tl = 
FixedlIncomeTradeImpl!( 

tradingAccount - NOMURA, 

instrument - IBM, 

currency = USD, 

market = NYSE, 

quantity = 100, 

unitPrice = 42) 


DSL 与 一 般 API 的 差异 明显 。DSL 版 的 创建 过 程 更 自然 ,更 适合 领域 用 户 阅 读 ; API 版 的 编程 
味道 比较 浓 ， 有 许多 语法 细节 需要 注意 ， 例 如 分 隅 参数 项 的 逗号 ， 实 例 化 时 要 写 出 类 名 等 。 稍 后 
你 会 发 现 ， 可 读 性 强 的 DSL 版 为 了 实现 操作 的 顺序 执行 ， 同 样 要 满足 许多 约束 条 件 。 如 果 看 重 顺 
序 的 灵活 性 ， 可 以 选择 Builder 模 式 (参见 6.10 市 文献 [3] )， 但 那样 会 之 来 Builder 对 象 的 可 变性 问 
题 和 方法 链 的 收尾 问题 (参见 6.10 节 文献 [4] )。 

本 节 开 头 介 绍 了 DSL 肢 本 的 未 来 发 展 趋 势 ， 现 在 我 们 进入 实现 环 市 。 

















6.4.1 实现 细节 


请 你 再 好 好 对 比 一 下 6.4 广 开 尖 的 DSL 脚 本 和 代码 清单 6-5 中 普通 的 构造 函数 调用 写法 。DSL 
脚本 中 几乎 没有 与 领域 语义 无 关 的 语法 结构 ,这 就 是 两 者 最 明显 的 区 别 。 前面 说 过 ，Scala 人 允许 省 
略 表示 方法 调用 的 点 运算 符 和 方法 参数 使 用 的 圆 括 号 。 就 算 在 这 样 的 有 利 条 件 之 下 ,如 采 没 有 一 
种 足够 灵活 的 手段 ， 还 是 不 能 把 各 种 成 分 合理 地 结合 起 来 ,成 为 符合 语言 逻辑 的 脚本 。 那 么 ,， 连 
接 各 霹 言 成 分 的 秘诀 是 什么 ? 

1. 隐 式 转换 

Tii. dé Scalai& zi HJ implicit s 特 性 | 我 们 以 创建 FixedI nc omeTrade 为 例 说 明 : 


val fixedlIncomeTrade = 
200 discount bonds IBM for client NOMURA on NYSE at 72.ccy(USD) 
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如 采 去 拯 各 种 语法 糖 , 并 有 旦 补 上 原来 省 略 的 点 符号 和 圆 括 号 ,那么 代码 将 变 成 下 面 这 样 的 规 
汇 形 式 : 
val fixedIncomeTrade = 
200.discount bonds (IBM) 
.for client (NOMURA) 


.On (NYSE) 
.at(72.ccy (USD) 


) 
当 所 有 的 方法 调用 和 参数 都 披挂 上 它们 应 有 的 符号 ， 看 上 去 就 和 2.1.2 市 Java 版 指令 处 理 DSL 所 
用 的 Builder 模 式 相差 无 几 了 。 当 前 实现 可 以 看 做 Builder 模 式 的 一 种 隐 式 实现 。 而 我 们 也 确实 在 实现 
中 运用 了 Scala 的 隐 式 转换 特性 ， 令 各 部 分 以 正确 的 次 序 组 织 起 来 ， 最 终 铺陈 为 有 意义 的 DSL 语 句 。 
我 们 以 2 00 discount bonds IBM 为 例 说 明 其 原理 。 只 要 掌握 这 个 词组 的 构建 机 制 , 例子 
的 其 他 部 分 都 不 在 话 下 , 看 看 完整 的 代码 , 就 知道 每 个 零件 的 位 置 和 作用 。 请 看 下 面 的 代码 片段 : 


type Quantity = Int 
class InstrumentHelper(qty: Quantity) { 

def discount bonds(db: DiscountBond) = (db, qty) 
j 

















implicit def Int2InstrumentHelper(qty: Quantity) - 
new InstrumentHelper(qty) 


我 们 定义 的 InstrumentHelper 类 接受 一 个 Int 作 为 输入 ,类 中 定义 了 discount_bonds 方 
法 。discount_bonds 方 法 的 参数 是 一 个 DiscountBond 实 例 ， 返回 由 给 定 债券 及 其 数量 组 成 的 
一 个 Tuple2。 接着 我 们 定义 了 从 Int 到 InstrumentHelper 类 的 implicit 转 换 。 其 作用 卓然 是 
将 输入 的 Int 不 动 声 色 地 转换 为 输出 的 InstrumentHelper 实 例 ， 我 们 才 得 以 在 实例 上 调用 
discount_bonds 方 法 。 由 于 Scala 允 许 省 略 点 符号 和 圆 括号 ， 调 用 过 程 可 以 写成 中 级 形式 ， 即 
200 discount bonds IBM， 这 样 看 上 去 更 有 自然 。 

只 要 用 户 定义 好 转换 ,Scala 会 在 脚本 的 调用 点 插入 必要 的 语义 结构 。 脚本 的 其 余部 分 也 是 同 
样 的 原理 , 在 重重 转换 之 际 , 构造 FixedIncomeTrade 实 例 所 需 的 参数 也 收集 到 位 ,最 终 传 人 一 
个 能 生成 FixedIncomeTrade 实 例 的 方法 。 隐 式 转换 有 一 些 需 要 向 握 的 惯用 法 , 等 看 到 完整 代码 
时 一 并 讲解 。 现 在 先 看 看 图 6-4， 图 中 详细 说 明了 完整 的 脚本 执行 过 程 。 

为 了 真正 理解 图 6-4， 需 要 展示 一 个 藏 在 API 号 后 悄然 发 挥 神秘 作用 的 对 象 ,详细 分 析 它 的 全 
部 代码 。 

2. 一 连 串 的 隐 式 转换 

仔细 观察 图 6-4, 不 难 发 现 此 起 彼 伏 的 隐 式 转换 其 实在 默默 扮演 大 builder 的 角色 。 这 些 转 换行 
为 逐渐 拼合 出 最 后 的 FixedIncomeTrade 对 象 。 代 码 清 单 6-6 定 义 了 执行 各 个 转换 的 辅助 摧 数 。 

















代码 清单 6-6 ”TradeImplicits 定 义 的 转换 浮 数 
package dsl 


import api... 
object TradeImplicits { 


type Quantity - Int 
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type WithInstrumentQuantity = (Instrument, Quantity) 


type WithAccountInstrumentQuantity - 
(Account, Instrument, Quantity) 

type WithMktAccountInstrumentQuantity = 
(Market, Account, Instrument, Quantity) 

type Money = (Int, Currency) 


class InstrumentHelper(qty: Quantity) { 
def discount bonds(db: DiscountBond) = (db, qty) 


class AccountHelper(wig: WithlInstrumentQuantity) { 
def for client(ca: ClientAccount) = (ca, wiq. 1, wiq.. 2) 


class MarketHelper(waiqg: WithAccountlinstrumentQuantity) { 
def on(mk: Market) = (mk, waiq. 1, waiq. 2, waiq. 3) 


class RichIint(v: Int) { 
def ecvic: Currency) = (v, c) 


class PriceHelper(wmaiq: WithMktAccountInstrumentQuantity) { 
def at(c: Money) = (c, wmaiq. 1, wmaiq. 2, wmaiq._3, wmaiq._4) 


' 








(调用 ) 
Y | (返回 ) (返回 ) 
InstrumentHelper 
(200, IBM) (ig 
AD (调用 ) 
LI 
v 
AccountHelper 
(NOMURA, 200, IBM) , 
(调用 ) 
[] 
Ji esesess » B 1 
H (返回 ) 
示 A 被 隐 式 状 
表示 A 被 隐 式 转换 为 B MarketHelper 
(NYSE, NOMURA, 200, IBM) 
L] 
FixedIncomeTrade i 
v 
PriceHelper 
Tuple2Trade ¢--------------- ((72,USD) , NYSE, NOMURA, 200, IBM) 


图 6-4 ”一连串 的 隐 式 转换 ， 最 终 构 造 出 FixedIncomeTrade 实 例 。 从 左 至 右 阅 
读 此 图 ， 跟 随 着 箭头 注意 观察 每 一 次 隐 式 转换 和 创建 辅助 对 象 的 子 过 程 
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代码 清单 6-7 继 续 处 理 TradeImplicits 对 象 ， 它 把 代码 清单 6-6 列 出 的 转换 函数 都 定义 成 


Scalałj implicito 


代码 清单 6-7 TradeImplicits 定 义 的 implicits 


object TradeImplicits { 


// 续 代 码 清 单 6-6 

implicit def quantity2InstrumentHelper (gty: Quantity) = 
new InstrumentHelper (qty) 

implicit def withAccount (wiq: WithInstrumentQuantity) = 
new AccountHelper (wiq) 

implicit def withMarket (waiq: WithAccountInstrumentQuantity) = 
new MarketHelper (waiq) 

implicit def withPrice(wmaiq: WithMktAccountInstrumentQuantity) = 
new PriceHelper (wmaiq) 

implicit def int2RichInt(v: Int) = new RichInt(v) 


import Util._ 
implicit def Tuple2Trade( 
t: (Money, Market, Account, Instrument, Quantity)) - 
(t match { 
case ((money, mkt, account, ins: DiscountBond, qty)) => 


FixedIncomeTradeImpl!( 
tradingAccount = account, 
instrument - ins, 
currency = money. a. 
tradeDate - TODAY, 
market - mkt, 
quantity = qty, 
unitPrice - money. 1) 





} 
} 


TradeImplicits 对 象 属于 das1 包 ， 而 所 有 的 领域 模型 抽象 都 属于 api 包 。 这 种 看 似 不 必要 
的 划分 有 其 深意 。 我 们 曾 讨论 过 用 基本 领域 模型 作为 底层 基础 ， 然 后 在 上 面 建立 DSL 门 面 的 设计 
惯例 ， 想 起 来 了 吗 ? 这 个 例子 也 按照 同样 的 思路 ， 把 所 有 的 领域 模型 抽象 放 入 api 包 ,语言 层 的 
抽象 则 放 在 as1 包 里 。 为 外 ， 让 这 两 个 抽象 层 保持 分 离 ， 这 样 有 利于 以 后 对 同一 个 领域 模型 建立 
多 种 DSL。 设 计 DSL 时 也 应 该 始终 锭 循 这 种 惯例 。 











利用 Scala 语 言 的 ijmplicits 特 性 可 以 构造 出 开放 类 ,类 似 于 Ruby 语 言 的 猴子 补丁 
和 Groovy 语 言 的 ExpandoMetaClass。 而 且 对 于 打开 进行 修改 的 类 ，Scala 提 供 了 
控制 其 可 见 范围 的 方法 。 只 要 针对 需要 用 到 新 增 方 法 的 局 部 词法 作用 域 导入 相应 的 模块 ， 
编译 器 会 处 理 好 其 他 事情 。 这 种 特性 不 会 像 Ruby 的 猴子 补丁 那样 影响 全 局 命名 空间 。 





3. Implicits 和 词法 作用 域 
我 们 利用 implicits 特 性 ， 通 过 将 Int 隐 式 转 换 为 RichInt 类 ,在 Int 旱 上 添加 了 一 个 ccy 
方法 。 如果 上 述 隐 式 转换 在 全 局 命名 空间 进行 , 则 所 有 线程 都 能 看 这 一 修改 。 我们 早 在 介绍 Ruby 
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猴子 补丁 时 就 已 经 讨论 过 这 样 做 的 明显 商 端 。 因此 我 们 如 循 一 条 黄金 准则 : implicits 必 须 被 限 
制 在 适当 的 作用 域 之 内 。 也 就 是 说 ， 你 应 该 划 定 隐 式 转换 的 词法 作用 域 ， 然 后 在 前 面 明确 声明 
import TradeImplicits. ， 以 人 免 影 响 其 他 线程 。 

尽管 隐 式 转换 优点 突出 , 可 是 使 用 它 时 不 能 直观 地 表现 在 代码 的 字面 上 , 调试 时 又 难以 捉摸 
其 来 龙 去 脉 。 为 此 , Scala 编 译 需 特别 提供 了 知 干 编译 参数 作为 调试 工具 ,方便 你 检查 隐 式 转换 ( 详 
16.1075 SCRA[2] )。 

你 刚刚 完成 平生 第 一 段 Scala DSL， 它 的 表现 力 有 没有 给 你 恢 艳 的 感 党 ?” V R— XE E SEES 
实现 的 来 龙 去 脉 ， 和 否则 请 多 看 几 遍 图 6-4， 跟 着 箭头 走 ， 你 对 代码 的 理解 也 会 越 来 越 深 入 。 

好 了 , 现在 你 被 Scala 激 起 的 兴 理 心情 也 差不多 该 平复 了 。 我 们 换个 冷静 的 心态 , 考虑 儿 个 创 
建 Scala DSL 时 需要 注意 的 关键 问题 。 























6.4. DSL 实现 模式 的 变化 


仔细 观察 我 们 在 领域 模型 上 搭建 的 DSL 层 代码 ， 可 以 辨认 出 一 种 模式 的 轮廓 ， 再 看 看 图 6-4， 
这 种 模式 显而易见 。 按照 DSL 脚 本 解析 的 方向 ， 从 左 至 右 浏 览 示意 图 。 我 们 连续 运用 Scala 隐 式 转 
H, 逐步 构建 一 个 n 元 组 。6.4.1 市 提 到 ， 这 样 的 构造 方式 其 实 就 是 Builder 模 式 。 只 不 过 传统 的 实 
现 方案 会 单独 设立 一 个 可 变 的 builder 抽 和 象 ， 负 责 构 建 实 体 ， 而 此 处 采用 了 一 种 不 可 变 的 Builder 模 
式 变 体 。 传 统 实现 呈现 一 种 命令 式 风 格 ，builder 对 象 连 续 发 出 方法 调用 ， 被 一 连 串 的 方法 调用 所 
更 新 ， 同 时 每 次 方法 调用 都 返回 builder 对 象 自身 。 相 比 之 下 ,， 在 这 个 不 可 变 方案 中 ， 各 个 方法 分 
属 不 同 的 类 , 要 靠 Scala 的 隐 式 转换 把 所 有 的 调用 粘 合 到 一 起 。 一 次 调用 产生 一 个 多 元 组 , 然后 该 
多 元 组 经 过 隐 式 转换 ， 作 为 输入 送 到 下 一 环节 ， 生 成 下 一 个 多 元 组 。 

你 完全 可 以 选择 传统 的 实现 方案 。 那样 的 话 , 会 有 什么 不 同 吗 ?” 传统 Builder 模 式 的 方法 调用 
序列 写 起 来 十 分 灵活 方便 ,但 问题 是 用 户 最 后 必须 调用 一 个 收尾 方法 来 结束 构建 过 程 (参见 6.10 
节 文 献 [4] )。 相 比 之 下 ， 本 例 当 前 的 实现 方式 已 经 将 调用 序列 固定 在 DSL 里 面 ， 如 果 用 户 没 构造 
完 交 易 对 象 就 提早 终止 调用 序列 ,那么 编译 需 会 发 出 提醒 。 两 种 方案 并 没有 绝对 的 优 劣 之 分 , 无 
PEAR RR e 

传统 的 Builder 模 式 有 一 个 可 变 的 builder 对 象 ， 用 户 通 过 它 的 连贯 接口 发 起 链 式 的 方法 调用 ， 
完成 对 该 builder 对 象 的 修改 。 本 例 中 的 Builder 模 式 实 现 由 一 系列 隐 式 转换 构成 ， 每 一 步 转换 产生 
的 对 象 都 是 不 可 变 的 。 尽 量 采 用 不 可 变性 的 抽象 设计 是 一 种 好 习惯 。 

在 领域 抽象 上 面 建立 DSL 门面 离 不 开 几 项 Scala 特 性 ， 表 6-3 总 结 了 这 些 特性 。 


表 6-3 ”交易 创建 DSL 用 到 的 Scala 特 性 
Scala 语 言 特性 作 H 
灵活 的 语法 。 由 于 省 略 点 符号 C.) 使 DSL 更 容易 阅读 ， 表 达 更 清晰 
和 圆 括号 ， 形 成 了 中 缀 表示 法 
隐 式 转换 通过 限制 了 词法 作用 域 的 开放 类 , 可 以 向 Int 等 内 建 类 加 入 新 方法 对 象 链接 
命名 参数 和 默认 参数 使 DSL 更 容易 阅读 
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创建 交易 对 象 的 DSL 至 此 告 一 段落 。 下 一 节 要 为 更 多 的 业务 规则 建立 DSL， 而 且 DSL 写 成 的 
每 一 条 规则 都 能 让 领域 专家 看 懂 并 把 关 。 基于 DSL 的 开发 , 其 出 发 点 正 是 促进 与 领域 专家 的 沟通 ， 
协助 专家 查验 由 开发 者 实现 的 业务 规则 。 下 一 步 的 DSL 开 发 需要 我 们 再 准备 一 些 领 域 抽 象 作为 瓜 
层 的 实现 模型 。 


65 用 DSL 建 模 业 务 规则 


业务 规则 是 DSL 的 一 个 应 用 热点 。 业 务 规则 属于 领域 模型 中 可 配置 的 部 分 , 正 是 最 需要 领域 
专家 过 目的 环节 。 如 果 DSL 非 常 容易 上 手 ， 连 领域 专家 都 能 REMAKE ) 写 上 几 行 测试 ， 那 简 
直 是 钊 上 次 花 的 好 事 。 我 们 的 DSL 准 备 针 对 交易 的 税 费 计 算 进 行 建 模 ， 图 6-4 说 明了 计算 的 详情 。 


表 6-4 DSL 将 要 建 模 的 业务 规则 : 计算 交易 的 税 费 


























5 og "ET 
(1) 执行 交易 买卖 双方 在 证 券 交 易 所 产生 交易 
Q) 计算 税 费 已 发 生 的 交易 需要 计算 相应 的 税 费 。 计 算 逻 辑 由 交易 类 型 、 交 易 的 证 券 、 进 行 交 易 的 证 
券 交易 所 等 因素 决定 





买卖 双方 按照 交易 净值 进行 结算 ， 税 费 是 交易 疤 值 的 核心 组 成 部 分 





我 们 的 DSL 要 求 能 被 领域 专家 老 鲍 看 明白 ， 理 解 其 中 的 业务 规则 ， 然 后 检查 规则 的 完备 性 ， 
验 明 规则 的 正确 性 。 那 么 ,第 一 步 应 该 做 什么 呢 ” 还 用 问 吗 ! 当然 是 建立 税 费 的 领域 抽象 ， 不然 
DSL 层 就 成 空中 楼 阁 了 。 

不 过 ,聪明 的 读者 肯定 急 着 想 看 下 一 轮 的 DSL 实 现 , 没 耐心 再 听 我 介绍 一 遍 领域 建 模 。 为 了 
提起 你 的 兴趣 ， 不 如 我 们 打 个 岔 ， 先 在 手头 已 有 领域 模型 的 基础 上 ， 构建 一 个 实现 业务 规则 的 
DSL, 这 个 小 练习 除了 能 提神 ,还 能 演示 Scala 语 言 一 项 重要 的 哨 数 式 特性 ， 它 应 用 广泛 ,并 能 
大 改善 一 种 最 常用 的 面 回 对 象 设计 模式 。 
































i Scala 知 识 点 
口 模式 匹配 可 用 于 实现 函数 式 的 抽象 ， 还 可 实现 一 种 可 扩展 的 Vistor 模 式 。 
口 高 阶 函 数 是 Scala 语 言 代 表 性 的 函数 式 编程 特性 。 可 用 于 实现 组 合子 。 
O 抽象 val 和 抽象 类 型 用 于 设计 开放 的 抽象 。 开 放 抽 和 象 可 适时 组 合 为 具体 的 抽象 。 
O 自 类 型 标注 ( self-type annotation ) 可 以 用 来 建立 抽象 间 的 关联 。 
口 偏 函数 (partial function ) 是 可 对 其 定义 域 的 一 个 子 集 进行 求 值 的 表达 式 。 


6.5.1 模式 匹配 如 同 可 扩展 的 Visitor 模 式 


Scala 语 言 的 case 类 除了 构造 归 数 的 调用 语法 较为 简单 ， 还 可 以 对 析 构 对 象 进行 模式 匹配 
(Scala 模式 匹 配 的 用 法 详 见 6.10 节 文献 [2] )。Haskell 等 匈 数 式 语言 的 代数 数据 类 型 (algebraic data 
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types， 详 见 http:/Wen.wikipedia.org/wiki/Algebraic data type ) 一 般 都 要 用 到 模式 匹配 特性 。 对 case 
类 使 用 模式 匹配 ， 是 为 了 实现 一 种 通用 的 、 可 扩展 的 Visitor 模 式 (参见 6.10 方 文献 [3] )。 

Visitor 模 式 用 于 我 们 的 DSL 设 计 ， 可 以 改善 领域 规则 的 表达 ， 使 规则 看 上 去 更 清晰 和 直观 。 
模式 匹配 这 种 图 数 式 实现 犯 式 ， 配 合 case 类 的 用 法 ， 能 大 大 提高 DSL 的 表达 能 力 和 扩展 能 力 ， 并 
且 不 会 像 一 般 面 癌 对 象 的 Visitor 实 现 那样 ， 容 易 出 现 领 域 规 则 被 次 埋 在 对 象 层 次 里 面 的 问题 。 与 
传统 的 面 问 对 象 Visitor 实 现 相 比 ， 模 式 匹 配 结合 Scala 中 的 case 类 能 够 打造 出 更 多 可 扩展 的 解决 方 
案 ， 谷 了解 这 方面 的 更 多 详细 信息 ， 参 加 6.10 节 文献 [5]。 

我 们 考虑 为 这 样 一 条 业务 规则 建立 DSL: 对 于 在 今天 之 前 开户 的 所 有 账户 , 将 其 额度 提高 10%。 

领域 模型 沿用 代码 清单 6-3 的 Account 抽 和 象 及 其 具体 实现 ClientAccount 和 Broker- 
Account。( 客户 账户 的 讨论 见 3.2.2 市 的 补充 内 容 。 中 介 账 户 是 中 介 方 在 证 券 交 易 组 织 开设 的 账 
P.) 实现 上 述 规则 的 要 点 ， 一 是 从 系统 内 的 所 有 帐户 中 找 出 客户 帐户 ， 二 是 从 客户 帐户 中 找 出 
需要 修改 额度 的 帐户 。 具 体 实 现 请 看 下 面 的 raisecreditLimits 男 数 。 















































def raiseCreditLimits(accounts: List[Account]) ( 
accounts foreach (acc -» bod 
acc match 4 
case ClientAccount( , _, openDate) if (openDate before TODAY) => 
acc.creditLimit = acc.creditLimit * 1.1 
case _ => 


J 
} 
} 


业务 规则 被 表达 为 对 case 类 进行 模式 匹配 的 规则 ， 请 注意 体会 这 种 写法 直观 、 清 晰 的 特点 。 
编译 需 会 在 后 台 将 case 语 句 侣 展开 为 偏 孙 数 ， 偏 困 数 的 定义 范围 只 限于 case 子 句 中 指定 的 取 值 。 
我 们 的 领域 规则 只 针对 客户 帐户 ， 所 以 就 在 第 一 条 case 子 句 里 面 把 定义 范围 限定 为 
clientAccount 实 例 一 一 用 模式 匹配 来 建 模 领 域 规则 就 是 这 么 轻松 ,第 二 条 case 子 句 是 “不 关心 ” 
TA, PMO FIRT C) 代表 了 我 们 不 关心 的 其 他 类 型 账户 。 关 于 模式 匹配 和 偏 函 数 这 两 
项 Scala 语 言 特性 的 详细 介绍 ， 请 查阅 6.10 节 文献 [2]。 

这 段 代 码 能 算 DSL 吗 ? 算 。 它 对 领域 规则 的 表述 ， 达 到 了 领域 专家 能 理解 的 直观 程度 。 它 把 
实现 浓缩 在 很 短 的 篇 幅 里 ,领域 专家 不 需要 来 回 翻 查 代码 就 能 掌握 规则 语句 的 语义 。 最 后 ， 它 的 
表述 只 沙 墨 在 规则 中 明确 提 及 、 有 重要 意义 的 属性 上 ， 其 他 无 天 紧要 的 部 分 都 用 一 句 “ 不 关心 ” 
一 市 而 过 。 














DSL 的 表达 能 力 只 要 满足 用 户 需 要 即 可 

DSL 不 一 定 非 要 向 自然 语言 靠拢 。 我 重申 : 对 DSL 表 达能 力 的 要 求 是 , 足够 满足 用 户 需 要 。 
本 例 的 代码 片段 由 程序 员 使 用 ,所 以 只 要 把 规则 的 意图 表达 清楚 ， 让 程序 员 能 维护 、 领 域 用 户 
能 看 懂 ， 这 样 就 足够 了 。 


上 面 的 DSL 片 段 应 该 能 让 你 初步 了 解 业务 规 则 建 模 , 接 下 来 我 们 要 继续 完成 本 节 开 头 搁 置 的 
任务 一 “建立 税 费 的 领域 模型 。 下 一 节 有 许多 新 的 Scala 建 模 技巧 在 等 着 你 , 绝 不 会 事 负 你 的 学 习 
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热情 。 所 以 ， 快 来 杯 咖 啡 提 提 神 ， 马 上 要 开始 了 。 


6.5.2 ”充实 领域 模型 


问题 域 的 几 个 基本 抽象 ，Traqe、Account 和 Instrument 都 已 经 准备 就 绪 ， 可 以 开始 考虑 
税 费 组 件 的 设计 了 。 计 算 交 昂 的 现金 价值 这 项 功能 ， 需 要 在 干 税 费 计算 方面 的 组 件 与 Trade 组 件 
共同 完成 。 

税 费 计算 的 职责 应 该 设立 一 个 单独 的 抽象 去 承担 。 税 费 的 计算 方法 是 模型 中 必 不 可 少 的 业务 
规则 ， 它 会 因为 业务 所 处 的 国家 、 交 易 所 而 变化 。 根 据 前 面 的 学 习 ， 想 必 你 已 经 总 结 出 规律 : 凡 
是 会 变化 的 业务 规则 ，DSL 可 以 让 规则 的 表述 直 白 、 清 晰 、 易 于 维护 ， 进 而 减轻 你 的 工作 负担 。 

图 6-5 是 我 们 的 解决 方案 的 总 体 组 件 模型 ， 说 明了 税 费 抽象 与 Trade 组 件 的 交互 情况 。 


TaxFeeCalculationComponent 
















Y 
TaxFeeCalculator TaxFeeRulesComponent 


;对 …… 计 算 税 费 





图 6-$ ”交易 领域 模型 中 的 税 费 组 件 。 此 类 图 反映 TaxFeeCalculationComponent 
与 其 他 协作 抽象 之 间 的 静态 关系 


除了 Account， 图 6-5 中 列 出 的 抽象 都 被 建 模 为 Scala trait 的 形式 。 因 此 它们 可 以 灵活 地 关联 
在 一 起 ,并 在 运行 时 与 合适 的 实现 组 合 在 一 起 ,构成 恰当 的 具体 对 象 ,请 看 代码 清单 6-8 中 TaxFee- 


Calculator 和 TaxFeeCalculationComponent 的 实现 代码 。 


代码 清单 6-8” 税 费 计算 组 件 的 Scala 实 现 


package api 


sealed abstract class TaxFee(id: String) E 各 单 例 对 象 
case object TRADE TAX extends TaxFee("Trade Tax") 
case object COMMISSION extends TaxFee("Commission") 
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case object SURCHARGE extends TaxFee("Surcharge") 计算 给 定 交 
case object VAT extends TaxFee("VAT") HARES 

易 的 税 费 
trait TaxFeeCalculator { 


def calculateTaxFee(trade: Trade): Map[TaxFee, BigDecimal] 


} — VV 
9 自 类 型 标注 
trait TaxFeeCalculationComponent { this: TaxFeeRulesComponent => 


val taxFeeCalculator: TaxFeeCalculator "d 
class TaxFeeCalculatorlimpl extends TaxFeeCalculator { 抽象 val 
def calculateTaxFee(trade: Trade): Map[TaxFee, BigDecimal] = ( 
import taxFeeRules. 
val taxfees - 
forTrade(trade) map {taxfee => 对 象 导 入 语法 


(taxfee, calculatedAs(trade)(taxfee)) 


} 


Map(taxfees:  *) 


} 


w 





深入 分 析 这 段 代 码 可 以 帮助 你 理解 整个 组 件 模型 是 怎样 联系 起 来 的 。 请 看 表 6-5 的 详细 分 析 。 


表 6-5 ” 齐 析 税 费 计 算 组 件 的 Scala DSL 实 现 模型 


TaxFee TaxFee 抽 象 是 值 对 象 (参见 6.10 市 文献 [6] ) ， 代 表 一 个 税 费 品种 。 不 同 的 税 费 


品种 用 不 同 的 Scala 单 例 对 象 @ 玉 表示 

注意 : 作为 值 对 象 ， 各 税 费 类 型 对 象 不 可 变 
TaxFeeCalculator TaxFeeCalculator 抽 象 负责 计算 给 定 交 易 应 承担 的 全 部 税 费 @ 
TaxFeeCalculationComponent _ 它 是 联系 起 整 组 税 费 相关 抽象 的 中 心 , 其 他 抽象 围绕 着 它 形 成 交易 税 费 的 计算 核心 


TaxFeeCalculationComponent 通 过 上 自 类 型 标注 的 与 TaxFeeRulesCompon- 


ent 协 作 @， 通 过 抽象 val 与 TaxFeeCcalculator 协 作 @ 














本 设计 的 优点 : 
m 抽象 与 实现 解 看 。 你 可 以 为 TaxFeeCcalculationComponent 的 两 个 协作 抽象 
提供 任意 实现 


m 实现 可 推迟 到 创建 TaxFeeCalculationComponent 的 具体 实例 时 


Scala 语 言 的 自 类 型 标注 

自 类 型 标注 可 赋予 组 件 内 的 自 指 对 象 this 额 外 的 类 型 。 这 种 用 法 含蓄 地 声明 trait Tax- 
FeeCalculationComponent extends TaxFeeRulesComponent^a 

只 不 过 我 们 并 不 立即 创建 这 条 编译 时 依赖 关系 ， 而 是 用 自 类 型 标注 的 方式 承诺 ， 在 具体 
TaxFeecalculationcomponent 对 象 实 例 化 时 ， 一 定 会 混入 TaxFeeRulesComponent 。 代 
码 清单 6-10 以 及 后 续 创 建 具体 对 象 的 代码 清单 6-11 和 代码 清单 6-12 履 行 了 上 述 承诺 。 

注意 , 在 TaxFeeCalculatorImpl#calculateTaxFee 内 部 有 一 处 针对 taxFeeRules 的 
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SA, ，taxFeeRules 也 是 TaxFeeRulesComponent 内 的 抽象 val。 
TaxFeeRulesComponent 被 声明 为 自 类 型 标注 ， 即 向 Scala 编 译 器 宣告 它 是 this 的 有 效 类 
自 类 型 标注 的 原理 详情 ， 请 参阅 6.10 节 文献 [2]。 





寥寥 几 行 代码 就 已 经 串 起 多 个 组 件 。 省 代码 是 Scala 市 来 的 好 处 ， 也 是 运用 高 级 抽象 编程 的 
结果 。 下 一 节 将 完成 TaxFeeRulesComponent 实 现 ， 并 且 设 计 一 种 DSL 来 定义 税 费 计算 的 领域 
规则 。 


6.5.3 ”用 DSL 表 达 税 费 计算 的 业务 规则 


我 们 首先 搭建 规则 组 件 的 领域 模型 ， 它 是 一 个 trait， 对 外 公开 税 费 计算 方面 的 主要 契约 。 为 
简单 起 见 ， 假 设 了 一 种 徐 化 的 情况 ， 现 实 中 的 规则 要 复杂 烦琐 得 多 。 


package api 


và 


trait TaxFeeRules ( 适用 于 给 定 
def forTrade (trade: Trade): List[TaxFee] 交易 的 TaxFee 
def calculatedAs(trade: Trade): PartialFunction[TaxFee, BigDecimal] D 
i 具体 的 计算 方法 


第 一 个 方法 forTrade 返回 给 定 交 易 应 缴纳 的 税 费 品种 列表 。 第 二 个 方法 calculatedAs 
@ 针 对 给 定 交 易 计算 具体 某 一 项 税 费 。 

现在 看 看 TaxFeeRulesComponent 组 件 , 它 除了 建立 税 费 计算 DSL , 还 提供 了 TaxFeeRules 
的 一 个 具体 实现 。 该 组 件 如 代码 清单 6-9 所 示 。 


代码 清单 6-9 ”表达 税 费 计算 业务 规则 的 DSL 


package api 





trait TaxFeeRulesComponent { 
val taxFeeRules: TaxFeeRules 


class TaxFeeRulesImpl extends TaxFeeRules { 


override def forTrade(trade: Trade): List[TaxFee] = { 
(forHKG orElse 
forSGP orElse 用 组 合子 把 几 个 raxFee 
forAll)(trade.market) 列表 连接 起 来 
针对 中 国 香港 市 场 
val forHKG: PartialFunction[Market, List[TaxFee]] = 1 的 专门 列表 


case HKG => 
List(TradeTax, Commission, Surcharge) 


i 针对 新 加 坡 市 场 的 
val forSGP: PartialFunction[Market, List[TaxFee]] = ( 专门 列表 
case SGP => 
List(TradeTax, Commission, Surcharge, VAT) 


j 针对 其 他 国家 /地 
val forAll: PartialFunction[Market, List[TaxFee]] = ( 区 的 通用 列表 
case _ => List(TradeTax, Commission) 
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Í 


import TaxFeeImplicits._ 


override def calculatedAs (trade: Trade): F 税 费 计算 的 领域 规则 
PartialFunction[TaxFee, BigDecimal] = { 
case TradeTax => 5. percent of trade.principal 
case Commission -» 20. percent of trade.principal 
case Surcharge => 7. percent of trade.principal 
case VAT => 7. percent of trade.principal 


J 
I 
} 


TaxFeeRulesCcomponent 是 对 TaxFeeRules 抽 和 象 的 发 展 ， 而 且 提 供 f TaxFeeRules 的 实 
现 ， 当 然 你 也 可 以 目 己 提供 一 个 实现 来 代 蔡 它 。TaxFeeRulesCcomponent 仍 然 是 一 个 抽象 组 件 ， 
为 里 面 的 taxFeeRules 只 有 抽象 的 声明 。 最 后 组 装 各 部 分 组 件 时 才 提 供 所 有 的 具体 实现 ， 构 
建 出 具体 的 TradingService。 现 在 先 来 仔细 研究 这 段 实现 代码 ,看 看 DSL 怎 么 判断 应 缴 税 费 品 
种 ， 又 怎么 算出 税 费 金额 。 

1. 选 出 合适 的 应 缴 税 费 品种 列表 

请 看 TaxFeeRulesImpl 里 面 的 DSL 实 现 , forTrade 方 法 只 有 一 行 , 它 是 用 Scala 组 合子 和 省 
数 式 风格 组 织 起 来 的 。 附 录 A 将 介绍 ,组 合子 是 高 阶 函 数 的 优秀 组 织 手 段 。( 不 读 附 录 A,， 你 可 错 
过 了 好 东西 。) 

组 合子 有 让 DSL 讲 言 精 炬 的 效果 。 它 是 函数 式 编程 最 有 了 吸引 力 的 部 分 之 一 。 既然 Scala 给 了 你 
函数 式 编程 的 强大 工具 , 该 用 组 合子 组 织 语言 时 瓯 别 犹 驳 。 为 给 定 交 易 找 到 适当 税 费 集 合 的 业务 
规则 ， 用 目 然 语 言 描述 就 是 下 面 这 样 : 

“为 在 中 国 香 港 市 场 进行 的 交易 提供 专门 的 列表 ， 或 者 为 在 新 加 坡 市 场 进行 的 交 

易 提 供 专门 的 列表 ， 或 者 为 在 其 他 市 场 进行 的 交易 提供 通用 列表 。” 
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语句 构成 的 代码 块 。 请 看 下 面 的 例子 : 

val onlyTrue: PartialFunction[Boolean, Int] = ( 


case true => 100 


} 

onlyTrue 是 一 个 PartialFunction。 它 只 对 其 定义 域 (全体 Boolean 值 ) 的 一 部 分 ， 即 
取 值 为 true 的 情况 做 了 定义 。PartialFunctiontrait 内 念 isDefinedAt 方 法 , 可 以 判断 某 个 
领域 值 是 否 属 于 partialFunction 的 定义 范围 。 例子 如 下 所 示 : 

scala» onlyTrue isDefinedAt(true) 

resl: Boolean = true 


scala» onlyTrue isDefinedAt(false) 


res2: Boolean - false 
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现在 对 比 着 以 上 规则 读 一 下 forTragde@O 里 面 那 一 句 实 现 。 你 会 发 现代 码 中 的 规则 表达 严 丝 
合 缝 地 对 应 了 上 面目 然 的 叙述 形式 ， 而 且 浓 缩 在 一 个 非常 紧凑 的 API 界 面 上 。 代 码 中 用 到 了 
orElse 组 合子 ， 它 的 作用 是 连接 多 个 Scala 偏 孔 数 ， 然 后 选取 第 一 个 对 给 定 参 数 取 值 有 定义 的 偏 
PK. 

按照 代码 清单 6-9 的 定义 ，forTrade 方 法 只 有 在 market 不 是 中 国 香港 ， 也 不 是 新 加 坡 时 ， 
才 返 回 一 个 通用 的 zaxFee 对 象 列表 。 理 解 了 forTradqe 的 原理 ， 和 掌握 了 Scala 俩 图 数 的 组 合 方法 ， 
1L ABB T forHkGO. forscpP. forAl 1,3x JL E ET ERR] TER. 

2. 计算 税 费 

现在 该 说 具体 的 税 费 计算 了 ， 这 是 DSL 要 解决 的 第 二 部 分 业务 规则 。 请 看 代码 清单 6-9 的 
calculatedAs@ 方 法。 你 能 看 出 它 实现 了 什么 规则 吗 ? 

calculatedAs 方 法 把 领域 规则 表达 得 十 分 清楚 ， 这 又 是 Scala 模 式 匹 配 的 功劳 。 它 的 几 条 
case 子 名 都 经 过 implicits 的 妙手 润色 。 通过 implicits 手 法 给 Double 类 增加 percent_of 方 
法 ， 然 后 写成 中 绥 形 式 ， 就 得 到 代码 清单 6-9 中 的 结果 。 隐 式 转 换 使 用 前 需要 先 将 其 定义 导入 当 
六 作用 域 ， 也 就 是 下 面 的 TaxFeeImplicits 对 象 


package api 


























object TaxFeeImplicits { 
class TaxHelper(factor: Double) { 


def percent of(c: BigDecimal) factor * c.doubleValue / 100 


} 


implicit def Double2TaxHelper (d: Double) = new TaxHelper (d) 
j 


导入 TaxFeeImplicits 对 象 之 后 ， 我 们 就 可 以 像 calculatedqas 方 法 那样 ， 把 句子 写成 符 
合 领 域 语法 的 形式 ， 业 务 专 家 们 看 了 一 定 会 局 兴 的 。 

3. DSL 和 API 有 什么 区 别 

6.5 节 主要 介绍 了 两 件 事 , 一 是 学 习 在 底层 实现 模型 上 搭建 创建 领域 实体 的 DSL 脚 本 , 其 次 学 
习 为 业务 规则 构建 DSL。Scala 提 供 了 几 种 手段 , 可 在 面向 对 象 的 领域 模型 上 实现 表意 清晰 的 API。 
这 些 手 段 前 面 已 经 介绍 过 。 我 在 两 部 分 的 实现 中 都 多 走 了 一 步 , 运用 Scala 的 隐 式 转换 提供 的 开放 
类 去 改善 语言 的 表达 效果 。 但 即使 不 利用 这 种 贴心 的 implicits 特 性 , 只 要 综合 运用 面向 对 象 和 
国 数 式 两 方面 的 特性 ， 已 经 足够 为 领域 模型 建立 一 套 表达 力 充 分 的 API。 

既然 如 此 ， 你 肯定 会 问 : 到 底 内 部 DSL 和 API 有 什么 区 别 呢 ? 坦白 讲 ， 区 别 不 大 。 如 果 一 套 
API 具 有 充分 的 表达 能 力 ， 能 向 用 户 清楚 揭示 领域 语义 ， 同 时 又 不 增加 额外 的 非 本 质 复杂 性 ， 那 
么 它 就 可 以 算 作 一 种 内 部 DSL。 纵 观 书 中 被 挂 上 DSL 名 号 的 代码 片段 ， 我 总 是 根据 它们 面向 领域 
用 户 的 表现 力 来 决定 它们 的 称呼 。DSL 实 现 者 需要 维护 代码 ， 领 域 专家 需要 理解 语义 ; 要 想 不 多 
做 语法 上 的 包装 同时 满足 这 两 方面 的 需要 , 你 选择 的 实现 语言 必须 拥有 建立 并 组 合 高 阶 抽象 的 能 
力 。 我 建议 你 再 次 重 温 附录 A 中 树立 的 抽象 设计 原则 。 

前 面 提 到 , 图 6-5 列 出 的 组 件 都 是 抽象 的 , 我 们 有 意 把 组 件 设计 成 trait。 不 过 你 还 没 见 识 过 trait 
的 真正 实力 ， 把 抽象 的 trait 组 合成 可 实例 化 的 具体 领域 实体 时 ， 你 才 知 道 这 种 组 合 威力 有 多 大 。 
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下 一 节 会 将 各 种 交易 组 件 组 合 起 来 ,构建 一 些 具体 的 交易 服务 , 然后 以 交易 服务 为 根基 建立 DSL 
的 语言 抽象 。 


6.6 ”把 组 件 妆 配 起 来 


市 着 为 税 费 计算 业务 规则 建立 DSL 的 经 验 ， 我 们 来 准备 下 一 道 DSL 大 六 ， 这 道 亲 的 材料 还 入 
儿 味 抽象 。 


* 

MÀ  Scala 知 识 点 
口 Scala 的 模块 ， 即 object 关 键 字 。 多 许 通过 组 合 抽象 的 组 件 来 定义 具体 的 实例 。 
口 各 种 组 合子 ， 如 map、foldqLeft、foldqRight。 


本 闻 将 介绍 怎样 运用 Scala 的 mixin 式 继承 来 组 合 不 同 的 trait。 你 还 会 看 到 Scala 语 言 支持 的 男 


一 种 抽象 形式 一 一 基于 类 型 的 抽象 。 可 供 选 择 的 抽象 组 合 手段 越 多 ， 领 域 模型 的 可 逆 性 束 越 强 ， 
也 越 容易 衍生 出 合适 的 DSL 语 法 。 


6.6.1 用 trait 和 类 型 组 合 出 更 多 的 抽象 


领域 模型 里 面 有 一 部 分 抽象 扮演 对 外 的 窗口 ， 直 接 面 癌 最 终 用 户 ， 领 域 服务 即 为 其 中 之 一 。 
领域 服务 使 用 各 种 实体 和 值 对 象 ( 详 见 6.10 节 文献 [6] )， 癌 用 户 履 行 契 约 。 在 代码 清单 6-10 中 ， 
TradingService 是 一 个 典型 的 领域 服务 ， 但 比 真 实 的 使 用 案例 简化 很 多 。 





代码 清单 6-10 ”服务 基 类 TradingService 的 Scala 实 现 
package api 


trait TradingService 


extends TaxFeeCalculationComponent bí 利用 trait 完 成 的 mixin 式 继承 
with TaxFeeRulesComponent { 
type T «: Trade È 
H FIJ 
def taxes (trade: T) = 抽象 关 型 
taxFeeCalculator.calculateTaxFee(trade) mixed 
P 基于 组 合子 的 编程 方式 
def totalTaxFee(trade: T): BigDecimal = ( 
taxes(trade).foldLeft(BigDecimal(0))( + ..2) 
9 抽象 方法 
def cashValue (trade: T): BigDecimal 


) 

图 6-6 简 要 讲解 了 服务 契约 的 履行 过 程 ， 同 时 指出 其 中 用 到 的 一 些 Scala 特 性 。 

到 目前 为 止 我 们 还 没有 上 有 具体 化 任何 抽象 ， 几 个 trait 孝 还 之 着 抽象 类 型 ， 下 一 市 将 给 出 定义 。 
Scala 语 言 提供 了 异常 丰 宦 的 抽象 设计 手段 供 你 选择 。 设计 时 , 应 该 针对 手头 的 问题 ,挑选 最 合适 
的 工具 ， 也 别 迄 了 参照 附录 A 讨 论 的 设计 原则 。 
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表 6-6 ”前 析 代 码 清单 6-10 中 的 mradaingService 领 域 服务 








特 性 说 明 
mixin 与 现 有 抽象 组 合 ”Tradingservice 被 泥人 了 两 个 组 件 ，TaxFeecalculationcomponent 和 
在 一 起 的 强大 能 TaxFeeRulesComponentGQ) 
注意 : 
在 mixin 方 式 下 ， 我 们 不 但 继承 了 接口 ， 还 继承 了 可 选 的 实现 。mixin 才 是 正确 的 多 重 继承 
机 制 


针对 交易 类 型 的 抽象 TradingService 对 交易 类 型 做 了 抽象 @。 这样 的 安排 很 好 理解 ， 因 为 不 同类 型 的 交易 需 
要 区 别 对 竺 , 由 各 自 专 门 的 交易 服务 去 处 理 。 虽 然 服 务 基 类 Traadqingservice 不 理会 具体 
的 交易 类 型 ， 但 交易 必须 满足 从 属于 Trade 基 类 这 个 基本 条 件 
什么 时 候 具 体 化 类 型 了 
到 了 有 具体 化 rraqingservice 时 ， 我 们 会 为 抽象 交易 类 型 T 提 供 一 个 具体 实现 
税 费 计算 的 核心 逻辑 ”服务 中 定义 了 具体 方法 totalTaxFee@， 用 于 合计 组 件 中 算出 的 税 费 项 目 ， 计 算 通 过 
位 于 totalTaxFee 方 法 foldqLeft 组 合子 完成 。Scala 组 合子 folaLeft 的 原理 以 及 占 位 符 “ ”的 用 法 详 见 附录 D 
提示 : 
应 该 优先 使 用 组 合子 ， 其 次 才 考虑 递归 或 迭代 
通过 抽 象 方 法 将 实现 cashvalue 是 抽象 方法 @， 因为 具体 的 逻辑 与 服务 要 处 理 的 交易 类 型 有 关 , 所 以 把 它 留 给 
工作 推 给 子 类 子 类 型 去 实现 





6.6.2 ”使 领域 组 件 具体 化 


EquityTradingService 为 股票 交易 提供 交易 服务 。 它 是 一 个 具体 的 组 件 ， 只 需 针 对 它 生 
成 的 服务 实例 化 一 次 。 代 码 清单 6-11 用 Scala 的 单 例 对 象 表 示 法 (具体 参见 6.10 节 文献 [2] ) 来 建 模 


EquityTradingSsServiceo 


代码 清单 6-11 针对 股票 交易 的 交易 服务 具体 实现 


package api 








object EquityTradingService 


extends TradingService { 9 提供 具体 的 类 型 
type T = EquityTrade 


E 
val taxFeeCalculator - new TaxFeeCalculatorImpl p 提供 具体 的 val 
val taxFeeRules = new TaxFeeRulesImpl 
override def cashValue (trade: T): BigDecimal = { 
trade.principal + totalTaxFee (trade) P 提供 具体 的 方法 


} 
} 


看 上 去 挺 简 单 的 ， 对 吧 ? 写法 有 以 下 几 个 要 点 : 

a 用 一 个 具体 类 型 EquityTrade@ 代 蔡 基 类 中 定义 的 抽象 交易 类 型 ; 

口 先前 混入 到 基 类 的 trait 还 留 下 儿 个 抽象 的 val， 我 们 要 一 一 提供 具体 的 实现 @; 
a 针对 股票 交易 的 cashValue， 给 出 具体 的 计算 方法 合 。 
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人 参照 EquityTradingSservice 的 实现 方式 ， 我 们 继续 实现 固定 收益 型 交易 FixedqIncome 
Trade 对 应 的 具体 交易 服务 FixedInc omeTradingService, 如 代码 清单 6-12 所 示 E 


代码 清单 6-12 Scala 中 针对 固定 收益 型 交易 的 交易 服务 


package api 





object FixedIncomeTradingService 
extends TradingService with AccruedInterestCalculationComponent { pi 
n 


type T - FixedIncomeTrade 


添加 计算 应 计 利 息 的 mixi 
val taxFeeCalculator = new TaxFeeCalculatorImpl 


val accruedInterestCalculator = new AccruedInterestCalculatorImpl 
val taxFeeRules - new TaxFeeRulesImpl 


Ww 1 Kl E EEG H 实 l 
def accruedInterest(trade: T): BigDecimal = { E ER RER N) 


accruedInterestCalculator.calculateAccruedInterest(trade) 


} 


override def cashValue(trade: T): BigDecimal = { 
trade.principal + 
accruedInterest (trade) + totalTaxFee (trade) 
} 
} 


注意 ， 我 们 在 核心 抽象 上 和 额外 混入 AccruedInterestCalculationComponent 组 件 @， 
它 的 功能 是 计算 “应 计 利 县 ”。 固 定 收益 型 证 养 一 般 和 都 含有 应 计 利 县 ， 而 且 固 定 收益 型 交易 的 现 
金价 值 应 该 将 此 利息 计算 在 内 。 这 条 业务 规则 不 难 从 FixedIncomeTradingService 的 定义 中 
看 出 来 。 

本 市 完 定义 了 领域 服务 抽象 ， 然 后 将 前 面 几 闻 构建 的 组 件 装 配 上 去 , 构造 出 可 以 在 DSL 中 直 
接 使 用 的 具体 Scala 模 块 。 


这 个 练习 展示 了 Scala 的 真正 威力 ， 它 可 以 推迟 到 最 后 时 刻 才 进行 具体 的 实现 。 

Scala 的 这 种 能 力 源 自 抽象 值 、 抽 浓 类 型 、 自 类 型 标注 这 三 大 支柱 的 支撑 。 除 此 之 
外 ，mixin 式 ,继承 灵活 的 抽象 组 合 能 力也 起 了 很 大 作用 。Scala 给 了 你 丰富 的 手段 去 设计 
可 扩展 的 各 式 组 件 。 


我 们 在 基础 领域 模型 组 件 的 基础 上 构建 了 一 套 DSL。 就 Scala 而 言 ， 我 把 DSL 层 看 做 根据 用 户 
需求 逐渐 演化 的 一 组 抽象 。 按 照 这 样 的 思路 ， 在 对 交易 系统 中 的 不 同 用 例 进 行 建 模 之 后 ， 你 将 得 
到 一 个 多 层次 的 组 合 抽象 模型 。 当 市 场 规则 有 变 ， 需要 在 现 有 抽象 上 加 入 新 规则 时 ， 也 就 是 当 现 
有 DSL 需 要 与 新 DSL 携 手 合 作 时 , 应 该 怎样 实施 ”下 一 节 说 说 怎么 用 Scala 的 类 型 系统 来 做 这 件 事 。 











6.7 ”组 合 多 种 DSL 


能 表明 不 同意 图 的 各 种 抽象 聚 在 一 起 , 构成 应 用 的 领域 模型 。DSL 层 作为 领域 模型 之 上 的 一 
层 门面 ， 只 有 它 的 抽象 级 别 正确 时 , 才 表 现 出 功用 和 可 扩展 性 。 本 市 把 DSL 整 体 作 为 一 个 抽象 蛙 
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元 ， 讨 论 不 同 DSL 之 间 的 组 合 方 法 。 以 后 直到 需要 按 不 同方 式 将 多 个 Scala DSL 组 合 在 一 起 的 情 
bb. 将 会 用 到 这 方面 的 技巧 。 作 为 讨论 用 的 和 案例， 我 们 从 交易 系统 领域 内 挑选 了 市 场 规 则 DSL 和 
交易 处 理 的 核心 业务 规则 作为 集成 对 和 象 。 

设计 好 DSL 的 抽象 之 后 可 以 通过 Scala 的 子 类 型 化 手段 来 扩展 它 。 子 类 型 化 会 产生 一 个 层级 和 天 
系 的 关联 结构 ， 针 对 相同 的 核心 语言 ， 有 各 种 特 化 抽象 分 别提 供 不 同 的 实现 。 这 不 就 是 所 请 的 多 
S? 没 错 ，6.7.17 将 利用 DSL 的 多 态 关 系 来 组 合 它们 。6.7.2 节 则 讨论 挎 样 组 合 那些 没有 杀 绿 天 
系 的 DSL。 毕 竞 不 同 的 DSL 一 般 有 痢 各 目 独 立 的 发 展 轨 迹 ，DSL 的 发 展 往往 也 不 受 应 用 生命 周期 
的 约束 。 应 用 架构 必须 提供 良好 的 环境 ， 让 各 式 各 样 的 DSL 结 构 能 无 缝 地 组 合 起 来 。 


6.7.1 扩展 天 系 的 组 合 方式 


交易 输 入 系统 之 后 ， 将 经 过 一 系列 毅 规 的 交易 处 理 流 程 ,， 其 中 人 第 一 个 步 桑 是 交 缆 充实。 该 步 
又 回 交 易 记 录 补 充 一 些 上 洲 系 统 没 有 百 接 提 供 的 衍生 信息 。 信 息 包括 交易 的 现金 价值 、 应 缴 税 费 
等 ， 不 同类 型 的 交易 证 券 还 会 有 其 他 各 陈 各 样 的 信息 。 

1. DSL 的 扩展 

下 面 的 脚本 骨 桨 看 上 去 还 不 是 DSL 应 该 有 的 样子 ,我 们 会 在 后 续 的 讨论 中 为 它 诱 加 血肉 。 为 
交易 处 理 流程 定义 方法 时 ， 还 会 用 到 之 前 实现 的 一 些 组 件 。 


package dsl 
































trait TradeDsl { 


type T «: Trade 9 抽象 方法 


def enrich: PartialFunction[T, T] 


} 

我 们 的 专用 语言 现在 的 语义 还 很 单 王 ， 它 仅仅 定义 了 一 个 enrich 方 法 ， 用 于 为 输入 系统 的 
交易 充实 信息 @。 

现在 分 别 为 FixedIncomeTrade 和 EquityTrade 两 种 交易 定义 具体 的 TradeDs1 实 现 如 代 
但 清单 6-13 和 代码 清单 6-14 所 示 。FixedIncomeTrade 对 应 的 DSL 要 用 到 我 们 之 前 设计 的 


FixedIncomeTradingServi ce 抽象 。 





代码 清单 6-13 ”人 针对 FixedIncomeTrade 的 交易 DSL 


package dsl 


import api._ 
trait FixedIncomeTradeDsl extends TradeDsl { 
type T - FixedIncomeTrade 


import FixedIncomeTradingService. 


override def enrich: PartialFunction[T, T] = ( 
case t => 
t.cashValue - cashValue(t) 


titaxes = taxesit) Ji 国定 收益 交易 的 应 计 利 息 


t.accruedInterest = accruedInterest(t) 
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| DSL 的 具体 实例 


object FixedIncomeTradeDsl extends FixedIncomeTradeDsl 


EquityTrade 对 应 的 DSL 要 用 到 EquityTradingService 抽 象 。 


代码 清单 6-14 ”人 针对 EquityTrade 的 交易 DSL 
package dsl 


import api._ 
trait EquityTradeDsl extends TradeDsl { 
type T - EquityTrade 


import EquityTradingService. 


override def enrich: PartialFunction[T, T] = ( 
case t 三 > 
t.cashValue - cashValue(t) 
t.taxes - taxes(t) 
七 
} 
object EquityTradeDsl extends EquityTradeDsl 
代码 清单 6-13 的 FixedqIincomeTradeDs1 和 代码 清单 6-14 的 EdauityTradeDs1， 为 同样 的 核 
心 语言 TradeDs1l 分 别提 供 具 体 的 语言 实现 。 它 们 的 交易 充实 语义 ， 分别 用 6.6 方 的 两 个 
TradingService 具 体 类 来 实现 。 从 图 6-6 的 类 图 可 以 看 出 这 两 个 语言 抽象 之 间 的 关系 。 


TradeDSL 
/ N 











type T «: 
FixedIncomeTradeDSL EquityTradeDSL Trade 


/> 


type T = type 





FixedIncomeTrade EquityTrade 


[T 


Kl6-6 TradeDSL 有 一 个 抽象 类 型 成 员 <: Trade, [HEquityTradeDSLTETH BJ f E 
上 指定 了 具体 的 类 型 T = EquityTrade，FixedIncomeTradeDSL 指 定 了 具体 类 型 
T = FixedIncomeTrade, EquityTradeDSL 和 FixedIncomeTradeDSL 是 TradeDSL 


的 特 化 抽象 


因为 FixedIncomeTradeDSL 和 EquityTradeDSIL 扩 展 卓 同一 个 父 抽象 ， 平常 那些 于 经 继承 





6.7 组 合 多 种 DSL 165 


关系 的 多 态 用 法 都 可 以 套用 上 去 。 但 如 果 我 们 需要 定义 这 么 一 个 TradeDSL 子 类 型 ， 它 并 不 针对 
特定 的 交易 类 型 ， 同 时 它 所 建 模 的 业务 规则 需要 结合 EquityTradeDSL 和 FixedIncome- 
TradeDSL 的 语义 ， 又 应 该 怎么 做 呢 ? 下 一 节 的 例子 演示 了 Scala 的 另 一 种 组 合 手段 。 

2. 通过 可 插 拔 蔡 换 的 语义 来 组 合 

业务 规则 会 随 市 场 条 件 、 监 管 规则 , 还 有 其 他 各 种 因素 而 改变 。 假设 券商 组 织 为 了 促进 高 价 
值 的 交易 ， 宣 布 了 这 样 一 条 新 的 市 场 规则 : 


“对 于 任何 在 纽约 证 券 交 易 所 进行 的 交易 ， 如 果 基 本 价值 >1000USD， 在 计算 其 净 
现金 价值 时 ， 应 对 基本 价值 进行 10% 的 折扣 。” 








现在 不 管 交 易 的 类 型 是 Equi tyTrade 还 是 FixedIncomeTrade ; 都 需要 在 交易 充实 算法 中 
实现 以 上 规则 。 这 条 规则 不 应 该 成 为 核心 现金 价值 计算 的 一 部 分 , 毕竟 让 短期 促销 用 的 市 场 规则 
影响 系统 的 核心 逻辑 是 不 合理 的 。 类 似 的 领域 规则 , 我 们 和 希望 实现 成 洋 殴 一 样 的 层 三 结构 ， 既 可 
灵活 地 增 减 ， 又 不 影响 核心 抽象 (请 比照 滩 饰 带 模 式 来 理解 ) 代码 清单 6-15 对 TradeDsl1 的 语义 
进行 扩充 ， 以 反映 上 述 针 对 个 别 市 场 的 新 规则 。 


代码 清单 6-15 ”为 TradeDs1 扩 充 新 语义 一 一 新 增 站 务 规则 
package dsl 
import api. 





trait MarketRuleDsl extends TradeDsl { 


val semantics: TradeDsl 
type T - semantics.T P 被 嵌入 的 内 层 语 义 
override def enrich: PartialFunction[T, T] = ( 
o nd 调用 内 层 语义 
val tr = semantics.enrich(t) 
D ad. 给 内 层 DSL 披 挂 
case x if x.market == NYSE && x.principal > 1000 => 上 附加 规则 
tr.cashValue = tr.cashValue - tr.principal * 0.1 ` 
tr 


case x => X 
} 
} 
} 


这 段 代码 是 讨论 DSL 组 合 的 一 个 小 高 潮 , 注意 semantics 抽 和 象 val 的 作用 , 内 层 DSL 被 衣 人 到 
这 个 位 置 ， 等 待 与 新 领域 规则 进行 组 合 人 @。 内 部 DSL 的 另 一 种 叫 法 正好 是 “内 骸 式 DSL”"。 大 多 
数 时候 ,DSEL 的 语义 是 和 实现 便 性 绑 定 在 一 起 的 。 但 这 个 例子 的 情况 不 一 样 , 我们 硕 望 竺 组 合 DSL 
的 语义 是 可 以 插 拔 和 奉 换 的 。 那 样 的 话 , 瓯 能 在 被 组 合 的 各 DSL 之 间 保 持 松散 的 砖 合 度 。 除 此 之 外 ， 
运行 时 的 插 拔 机 制 有 利于 推 运 确定 具体 的 实现 。 代 人 码 清单 6-16 为 EquityTradeDsl 、 
FixedIncomeTradeDs1 分 别 与 新 规则 MarketRuleDs1l 的 组 合体 定义 具体 对 象 。 























代码 清单 6-16 ”组 合 DSL 


package dsl 
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object EquityTradeMarketRuleDsl extends MarketRuleDsl { 
val semantics - EquityTradeDsl 


} 


object FixedIncomeTradeMarketRuleDsl extends MarketRuleDsl ( 
val semantics - FixedIncomeTradeDsl 


} 

稍 后 你 会 看 到 各 种 DSL 组 合成 果 的 汇总 ,在 此 之 前 ,我 们 要 用 前 面 学 过 的 函数 式 组 合子 知识 ， 
再 扩充 一 下 TradeDs1 的 功能 。 组 合子 在 也 数 式 层面 和 对 象 层面 都 可 以 表现 出 它 的 组 合 性 语义 。 

3. 通过 函数 式 组 合子 来 组 合 

本 节 开 头 曾 经 提 到 交易 的 处 理 流 程 , 还 记得 吗 ? 在 执行 交易 充实 步 又 之 前 , 首先 要 验证 交易 的 
有 效 性 。 而 在 充实 之 后 , 交易 还 要 被 登记 到 会 记 系 统 的 账 竹 之 中 。 现实 中 的 交易 处 理 过 程 其 实 不 止 
这 几 步 ， 但 作为 演示 ， 我 们 姑且 让 例子 简单 一 些 。 应 该 怎样 用 Scala DSL 建 模 这 个 流程 序列 呢 ? 

组 成 流程 序列 的 步骤 适合 用 PartialFunction 组 合子 来 建 模 ， 而 模式 匹配 可 以 把 规则 表达 
得 清晰 直 日 。 代 码 清 单 6-17 把 原先 的 TradeDs1 上 骨架 变 得 丰满 7 了 一些， 增加 了 一 僚 控 制 结构 来 表 
示 对 流程 步骤 的 规定 。 
代码 清单 6-17 ”在 DSL 中 建 模 交 易 的 处 理 流程 


package dsl 























import api... 
trait TradeDsl { 


type T «: Trade F 加 入 自 定 义 操 作 


def withTrade(trade: T)(op: T => Unit): T= { 


if (validate(trade)) 
(enrich andThen journalize andThen op) (trade) 


trade e 基于 组 合子 的 中 组 运算 


def validate(trade: T): Boolean = //.. 
def enrich: PartialFunction[T, T] 
def journalize: PartialFunction[T, T] = ( 
case t => //.. 
} 
} 


为 什么 要 把 enrich 定 义 成 PartialFunction 呢 ?Scala 的 偏 函 数 具 有 令 人 赞 改 的 组 合 能 力 ， 
特别 适合 用 来 构建 高 阶 结构 。 

withTrade 被 定义 成 一 个 控制 结构 , 交 给 它 一 笔 交 易 , 它 会 从 头 到 尾 执行 完 交 多 处 理 的 全 部 
流程 。 这 个 控制 结构 还 具有 回流 程 中 搬入 目 定义 操作 的 能 力 ， 目 定义 操作 通过 (op: T => Unit) 
参数 @O 传 人 withnTrade。 传人 的 参数 应 该 是 一 个 作用 于 交易 ， 且 没有 返回 值 的 函数 。 日 志 、 发 送 
邮件 、 审 计 跟 踪 等 函数 就 具备 这 样 的 特点 ， 有 副作用 , 但 不 影响 操作 后 的 返回 值 。 类 似 的 具有 副 
作用 的 操作 很 适合 通过 这 个 途径 插入 到 交易 人 处理 流程 。 

withTrade 代 码 中 的 模式 匹配 块 值得 一 说 , 它 只 用 四 行 代码 就 将 全 部 领域 规则 额 括 在 内 。 另 
外 andqThen 组 合子 人 也 出 色 地 表达 了 各 步骤 的 既定 顺序 。 
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4. 使 用 组 合 完毕 的 DSL 

DSL 组 合 完毕 后 的 实际 表现 请 看 代码 清单 6-18。 这 上 段 脚 本 用 我 们 的 “交易 创建 DSL” 建 立 一 
笔 交 易 ， 然 后 执行 充实 、 验 证 等 各 个 步 又， 完成 交易 处 理 的 全 过 程 ， 最 后 联合 市 场 规 则 DSL 算 出 
交易 最 后 的 现金 价值 。 


代码 清单 6-18 ”交易 处 理 流 程 DSL 


import FixedlIncomeTradeMarketRuleDsl. 











withTrade( 

200 discount bonds IBM 

for client NOMURA 
on NYSE 
at 72,ccy(USD)) {trade => 

Mailer(user) mail trade 

Logger log trade 
j cashValue 


本 节 用 了 装饰 器 (Decorator ) 模式 (参见 6.10 节 文献 [3] ) 作为 组 合 手段 。 我 们 将 semantics 
作为 待 装饰 的 DSL， 在 它 的 外 面包 庄 装 点 其 他 必要 逻辑 。 通 过 装饰 右 模 式 ， 对象 可 以 动态 地 增 减 
其 职责 。 它 的 这 种 能 力 在 我 们 需要 组 合 有 亲缘 关系 的 DSL 时 ， 正 好 能 派 上 用 场 。 

要 是 待 组 合 的 几 种 语言 之 间 没 有 亲缘 关 系 ， 又 会 出 现 什 么 情况 呢 ?” 日 斯 和 时 间 、 货 币 、 几 何 
图 形 等 领域 的 DSL， 营 党 作为 辅助 工具 穿插 于 更 大 型 DSL 的 人 舞台 间 际 。 下 一 节 学 习 如 何平 稳 掌 控 
这 类 语言 的 成 长 变化 。 


6.7.2 ”层级 关系 的 组 合 方式 


在 大 型 DSL 肢 本 里 面 艇 入 小 型 DSL 是 相当 和 常见 的 做 法 。 就 以 金融 交易 系统 来 说 ,例如 处理 贷 
MR, 管理 日 期 时 间 ， 投 资 组 合 报 表 中 管理 客户 收 支 结余 等 场合 ， 都 不 难 发 现 DSL 的 身影 。 

现在 假设 我 们 需要 为 客户 投资 组 合 报 表 实 现 一 种 DSL， 用 于 报告 到 给 定 日 期 为 止 , 客户 账户 
下 持 有 的 各 类 证 券 和 现金 结余 。 注 意 , “客户 投资 组 合 ” 和 “结余 ”这 两 个 词 代表 着 两 个 重要 的 
领域 概念 ， 值 得 我 们 用 DSEL 的 方式 建 模 它们 的 抽象 。 它 们 虽然 是 两 个 互相 独立 的 抽象 ， 却 时 稼 发 
生 一 些 密切 的 联系 。 

1. 避免 与 实现 发 生 耦 合 

表 6-7 能 帮 我 们 理 清 这 两 个 抽象 之 间 的 关联 ， 只 有 和 擎 握 它 们 的 关系 ， 才 能 保证 概念 上 独立 的 
DSL 在 实现 上 也 能 保持 独立 。 

Balance 是 盖 在 实现 外 面 的 抽象 接口 。Scala 人 允许 定义 “类 型 同义词 ”(type synonym )。 我 们 
只 要 规定 type Balance = BigDpecimal， 避 可 以 用 Balance 这 个 名 字 来 称呼 客户 名 下 的 资产 
净值 。 但 是 这 种 便利 会 产生 别 的 影响 吗 ?” 抽象 的 Portfolio DSL 会 根据 需要 被 特 化 为 各 种 具体 
类 型 ， 形 成 6.7.1TTradeDs1 那 样 的 大 家 族 。 在 这 种 情况 下 ， 直 接 在 Portfolio DSL 基 类 型 中 骸 
入 Balance 的 实现 , 将 导致 整 棵 Portfolio 家 族 树 都 与 内 藤 的 Balance 具 体 实现 耦合 在 一 起 。 就 
算 以 后 真 的 有 需要， 也 绝 无 可 能 更 改 内 骸 的 实现 。 所 以 , 一定 不 要 将 一 方 下 接 内 骸 到 为 一 方 ， 而 
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应 该 从 层次 化 的 角度 去 设计 组 合 形态 。 最 终 让 两 个 DSL 既 能 完美 契合 ， 又 不 至 于 密 不 可 分 ， 随 时 
能 换 上 你 想 要 的 实现 。 
表 6-7 ”按照 层级 关系 组 合 多 个 DSL 
需要 各 自 独立 发 展 的 两 个 关联 抽象 





“结余 ” 指 的 是 : “客户 资产 组 合 ” 指 的 是 : 
客户 持 有 的 现金 和 证 券 数 量 有 反映 客户 拥有 的 各 类 资产 结余 的 报表 


e 一 个 具有 确切 语义 的 重要 领域 概念 , 可 以 被 建 模 为 DSL m 一 个 具有 确切 语义 的 重要 领域 概念 , 可 以 被 建 模 为 DSL 
m 一 个 数额 ， 在 实现 中 可 以 用 BigDecimal 来 表示 ， 但 
BigDecimal 对 于 领域 用 户 来 说 不 具有 任何 意义 








注意 : 
你 应 该 时 刻 注 意 ， 不 要 让 对 外 公开 的 语言 结构 暴露 了 背后 的 实现 。 能 做 到 这 一 点 的 话 ， 不 仅 DSEL 的 可 读 性 更 好 ， 还 
便于 在 不 影响 客户 代码 的 前 提 下 ， 完 美 地 更 改 内 部 实现 。 关 于 如 何 隐 藏 内 部 实现 的 话题 ， 请 参考 附录 A 中 的 讨论 。 
对 关系 建 模 : 
下 面 这 段 脚本 清楚 地 说 明 ， 在 领域 用 户 眼 中 ， 结 余 抽 和 象 和 资产 组 合 抽象 应 该 在 领域 API 里 面 呈 现 什 么 样 的 关系 : 
trait Portfolio ( 


def currentPortfolio(account: Account): Balance 


} 
待 完成 工作 : 

结余 DSL 可 以 有 多 种 实现 ， 资 产 组 合 DSL 也 一 样 ， 我 们 设计 的 组 合 方式 ， 要 保证 两 者 的 关联 关系 不 因为 任何 一 方 的 
实现 变化 而 受到 影响 。 定 义 一 个 Portfolio DSL 实 现时 ， 应 该 能 够 灵活 地 插入 任意 一 种 Balance DSEL 实现 。 





代码 清单 6-19 的 DSL 用 于 对 客户 资产 组 合 建 醒 ， 想 想 看 它 有 什么 问题 。 


代码 清单 6-19 FEKA ADSL 
package dsl 


import api... 
import api.Util. 


trait Portfolio 4 

type Balance = BigDecimal 

def currentPortfoliol(account: Account): Balance P PSI: d: GE 
) b 


trait ClientPortfolio extends Portfolio { 
override def currentPortfolio(account: Account) - 9 现实 中 此 处 逻辑 会 很 复杂 
BigDecimal(1200) 
] 


哈 ! 才 要 实现 第 一 个 特 化 的 Portfolio DSL, 被 内 般 绑 住 手 脚 的 Balance 抽 象 估 就 支持 不 
ETO. 我 们 试 一 试 维持 它们 的 层级 关系 不 变 , 但 是 将 Balance DSL 的 具体 实现 留 在 Portfolio 
DSL 之 外 。 虽 然 按 照 层级 关系 来 组 合 ， 必 然 意 味 痢 一 方 要 包含 在 男 一 方 里 面 ， 但 我 们 计划 中 的 
组 合 方式 有 一 个 地 方 不 同 于 代码 清单 6-19， 那 就 是 我 们 航 入 的 是 DSL 的 接口 ， 而 非 实现 。 管 案 
一 想 便 知 ， 没 错 ， 正 是 抽象 val! 我 们 让 Portfolio DSL 包 含 Balance DSL 的 一 个 实例 ， 不妨 
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称 为 Balances。 

2. 对 结余 的 建 模 

太 人 简单 的 DSL 示 例 很 难 让 你 深刻 理解 DSL。 你 有 当 你 看 到 DSL 将 底层 复杂 性 用 容易 理解 的 语 
法 表述 ， 才 能 切实 感受 到 DSL 的 强大 表现 力 。 前 面 我 们 人 简单 地 用 BigDecimal 来 建 模 “ 结 余 ” 概 
念 。 但 是 对 于 熟悉 证 券 交 易 操作 的 业内 人 士 来 说 ， 客 户 账户 下 的 结余 实际 上 表示 ， 客 户 在 特定 日 
期 按照 指定 货币 计算 的 现金 头寸 。 例 子 将 省 略 从 客户 的 资产 组 合算 出 结余 的 具体 过 程 。 作 为 DSL 
契约 的 Balances 如 代码 清单 6-20 所 示 ， 同 时 列 出 的 还 有 它 的 一 个 具体 实现 BalancesImp1l。 


代码 清单 6-20” 建 模 账 户 结余 的 DSL 


package dsl 




















import java.util.Date 
import api._ 

import api.Util._ 
import api.Currency. 


trait Balances { 抽象 类 型 


type Balance 


def balance(amount: BigDecimal, CCy: Currency, asOf: Date): Balance 
def inBaseCurrency(b: Balance): (Balance, Currency) 
def getBaseCurrency: Currency - USD 
def getConversionFactor(c: Currency) = 0.9 
i 9 具体 实现 
class BalancesImpl extends Balances { 


case class BalanceRep(amount: BigDecimal, 
ccy: Currency, asOfDate: Date) 
type Balance - BalanceRep 


override def balance(amount: BigDecimal, ccy: Currency, asof: Date) 
= BalanceRep(amount, ccy, asOf) 


override def inBaseCurrency(b: Balance) 
= (BalanceRep(b.amount * getConversionFactor(getBaseCurrency), 
b.ccy, b.asOfDate), getBaseCurrency) 
j 


object Balances extends BalancesImpl 

客户 可 以 根据 喜好 指定 报告 结余 金额 时 采用 的 货币 类 型 , 而 监管 机 构 往往 要 求 一 律 按 照 基本 
货币 来 计算 。 基 本 货币 是 投资 者 记 账 时 采用 的 货币 。 外 汇市 场 上 一 般 用 美元 充当 基本 货币 。 在 代 
码 清单 6-20 的 DSL 实 现 中 ，inBasecurrency 方 法 负责 按 基 本 赁 币 报告 结余 。 我 们 在 Balances 
的 示例 实现 BalancesImp1 里 面 ， 将 抽象 类 型 Balance 落 实 为 由 金额 、 货 币 、 日 期 ( 结余 总 是 针 
对 具体 日 期 进行 计算 ) 构成 的 三 元 组 。 

3. 结余 DSL 与 资产 组 合 DSL 的 组 合 

Portfolio DSL 和 需要 为 组 合 做 一 些 准备 ， 安 排 一 个 数据 成 员 的 位 置 给 Balances 类 型 的 抽象 
val@， 如 代码 清单 6-21 所 示 。 
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代码 清单 6-21 资产 组 合 DSL 的 接口 契约 
package dsl 


import api._ 


trait Portfolio { I 为 结余 DSL 预 留 的 抽象 val 
val bal: Balances 对 象 导 入 语法 
import bal. . 
def currentPortfolio(account: Account): Balance 


] 
为 了 在 类 的 内 部 访问 bal1 对 象 的 所 有 成 员 , 我 们 运用 了 Scala 的 对 象 导入 ( object import ) 语法 @， 
定义 完 接口 ， 我 们 再 看 看 具体 实现 。 代 码 清 单 6-22 实 现 了 一 个 计算 客户 账户 结余 的 Portfolio。 


代码 清单 6-22 ”资产 组 合 DSL 的 一 个 具体 实现 


trait ClientPortfolio extends Portfolio { 








val bal - new BalancesImpl 
import bal. 落实 到 具体 的 实现 
override def currentPortfolio(account: Account) = 

val amount = //.. 

vel Cey = /7 实现 细节 略 


val asOfDate = //.. 


balance (amount, ccy, asOfDate) 


Í 

object ClientPortfolio extends ClientPortfolio 

例 中 的 CLientPortftolio DSL 已 经 落实 到 Balances 的 一 个 具体 实现 。 下 一 步 需 要 保证 ， 
当 clientPortfolio 与 其 他 同样 用 到 Balances 的 DSL 组 合 时 ， 双 方 拥有 相同 的 BalLlances 
实现 。 

我 们 用 为 一 个 例子 来 说 明 怎 样 做 到 这 一 点 。 代 人 码 清单 6-23 给 出 了 一 个 起 洲 饰 各 作用 的 
Portfolio 实 现 一 一 Auditing， 它 可 以 为 其 他 Portfolio 实 现 增加 审计 功能 。 


代码 清单 6-23 ”资产 组 合 DSL 的 男 一 个 实现 








trait Auditing extends Portfolio { 9 AJ ERBUSX-£HATDSL 
val semantics: Portfolio 
val bal: semantics.bal.type 
import pal. P Scala 单 例 类 型 
override def currentPortfolio(account: Account) = 
inBaseCurrency( 按 基本 货币 报告 结余 
semantics.currentPortfolio(account)). 1 


} 

Auditing 不 但 能 与 其 他 Portfolio DSL 进 行 组 合 @， 还 保证 被 组 合 的 Portfolio ( B] 
semantics ) 5E C WX A 2 EH 5 HJ Balances DSL fii Hi R — A X: Ei, (Balances ft A FI 
Auditing SÆ Portfolio.) 我 们 为 了 施加 这 样 的 约束 ， 将 Auaiting 的 成 员 bal 声 明 为 
semantics.bal， 从 而 将 它 定 义 为 一 个 Scala 单 例 类 型 。 接 下 来 ， 可 以 指定 semantics 和 bal 指 
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定 具 体 的 实现 ， 创建 一 个 支持 Auditing 功 能 的 cl1ientPortfolio 抽 象 。 请 看 下 面 的 代码 片段 : 


object ClientPortfolioAuditing extends Auditing { 
val semantics - ClientPortfolio 
val bal: semantics.bal.type - semantics.bal 


] 
通过 层级 方式 来 组 合 多 个 DSL， 其 优点 如 表 6-8 所 示 。 


表 6-8 ”通过 层级 方式 来 组 合 DSL 的 优点 











优 m 理 由 
不 受 抽 象 内 部 表达 的 影响 对 多 个 DSL 进 行 组 合 时 ,语句 中 不 会 出 现 内 骸 实 现 的 任何 细 市 
耦合 松散 参与 组 合 的 DSL 之 间 斐 合 松散 ， 各 目 可 以 独立 演进 
静态 类 型 安全 Scala 拥 有 强大 的 类 型 系统 ， 可 以 由 编 详 硕 来 实施 所 有 的 约束 


DSL 组 合 这 一 主题 在 “Polymorphic embedding of DSLs” (6.10 节 文献 [7] ) 这 篇 论文 中 有 详 
细 介 绍 。 如 采 和 希望 详细 了 解 在 Scala 语 言 中 组 合 DSL 的 其 他 方法 ， 请 参阅 该 论文 。 

发 挥 Scala 语 言 面 回 对 象 编 程 和 也 数 式 编程 的 双重 能 力 ， 灵 活 组 合 各 种 抽象 的 技巧 ， 本 曹 
至 此 已 经 展示 了 很 多 示例 ， 但 我 们 对 组 合 这 个 话题 的 讨论 还 缺 一 角 ， 那 就 是 Monad 化 抽象 。 
Monad 化 抽象 广泛 用 于 构建 具备 组 合 性 的 计算 结构 。Monad 概 念 源 自 范畴 论 ( category theory ) 
( 别 紧 张 , 这 本 书 不 会 涉及 Monad 背 后 的 数学 理论 ; 感 兴趣 的 话 , PRRIDAETTBESE). 下 一 市 将 
展示 怎样 利用 Scala 语 言 的 Monad 化 结构 去 实现 一 些 语法 糖 。 这 种 技术 可 用 于 设计 DSL 操 作 的 
串联 机 制 。 
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我 一 二 反复 强调 ， 抽 象 组 合 得 越 好 ，DSL 的 可 读 性 就 越 强 。 当 针对 “运算 ”进行 抽象 时 ， 医 
数 式 编程 提供 的 组 合 能 力 要 超过 面 品 对 和 象 编程 模型 。 这 是 因为 函数 式 编程 将 各 种 运算 都 当做 纯 数 
学 也 数 来 使 用 ,不 产生 改变 状态 的 副作用 。 如 果 气 数 与 改变 状态 分 离 ， 它 就 成 了 一 种 不 依赖 于 任 
何 外 部 上 下 文 ， 可 以 单独 验证 的 抽象 。 借助 也 数 式 编程 提供 的 数学 模型 ,运算 可 以 被 组 合成 一 些 
阴 数 式 的 组 合体 。 我 不 准备 深入 介绍 范畴 论 或 者 其 他 具有 类 似 功 用 的 数学 理论 体系 。 你 只 要 记 住 ， 
国 数 的 组 合 性 意味 着 我 们 可 以 用 简单 的 构件 块 搭 建 出 复杂 的 抽象 。 

1. 什么 是 Monad 

Monad 可 以 理解 成 函数 组 合 或 者 加 强 版 的 绑 定 。 按 照 Monad 的 规则 构造 出 来 的 抽象 ， 可 以 在 
优美 的 组 合 语义 指挥 之 下 ， 用 来 构造 更 高 阶 的 抽象 。 


将 运算 的 结构 使 用 “ 值 ” 和 “使 用 这 些 值 的 运算 序列 ”来 表示 ， 我 们 就 得 到 一 个 
Monad 抽 和 象 。 许 多 Monad 再 按照 依存 关系 组 合 起 来 ， 可 以 构成 更 大 规模 的 运算 。 
Monad 的 理论 基础 是 令 人 望 而 生 晤 的 范畴 论 , 但 如 果 你 有 兴趣 了 解 , 那么 6.10 节 文献 [10] 
可 以 作为 初步 的 阅读 材料 。 一 般 读 者 并 不 需要 深究 ， 放 松 就 好 。 
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这 里 的 讨论 不 会 深入 到 理论 层面 , 只 会 针对 设计 Scala DSL 的 需要 ,从 实用 的 角度 探讨 Monad 
的 一 些 特性 。 等 到 第 8 章 介 绍 Scala 的 分 析 需 组 合子 时 ， 上 再 展示 更 多 的 Monad 化 构造 单元 。 本 贡 讨 
论 的 主要 对 象 是 Scala 语 言 中 一 些 具备 Monad 性 质 的 操作 , 它们 可 以 使 DSL 的 组 织 比 面 回 对 象 编 程 
中 的 对 应 结构 更 加 优美 。 

本 节 的 补充 内 容 简 单 介绍 了 Monad。Monad 概 念 的 详细 信息 请 参阅 6.10 节 文献 [9]。 

















Monad 小 讲座 

Monad 是 一 种 可 以 绑 定 一 系列 运算 的 抽象 。 这 里 没有 给 出 理论 化 的 一 般 性 定义 , 而 是 试 着 
用 Scala 的 语汇 来 界定 Monad 有 哪些 性 质 。( 如 果 按 照 传 统 思 路 ,需要 动用 范畴 论 或 Haskell 语 言 ， 
从 一 阶 逻辑 的 基本 原理 说 起 ; 以 Scala 语 言 作为 解释 基础 似乎 更 实用 一 些 )。 

一 个 Monad 由 以 下 三 部 分 定义 。 

(1) 一 个 抽象 M[RA] ， 其 中 M 是 类 型 构造 函数 。 在 Scala 语 言 中 可 以 写成 class M[A], 或 者 
TAI 

(2) 一 个 unit 方 法 (unit v) 。 对 应 Scala 中 的 构造 函数 new M(v) 或 者 M(v) 的 调用 。 

(3) 一 个 bind 方 法 ， 起 到 将 运算 排 成 序列 的 作用 。 在 Scala 中 通过 flatMap 组 合子 来 实现 。 
bind f m 对 应 的 Scala 语 句 是 m flatMap f. 

例如 List[A] 是 Scala 语 言 中 的 一 个 Monad。 它 的 unit 方 法 由 构造 函数 List(.) 定 义 ， 它 
的 bind 方 法 则 由 flatMap 组 合子 实现 。 

那么 是 不 是 任何 抽象 只 要 具备 以 上 三 部 分 ， 就 成 了 一 个 Monad 呢 ? 不 一 定 。Monad 还 必须 
满足 以 下 三 条 规则 。 

(1) 右 单 位 元 Cidentity )。 即 对 于 任意 Monadm， 有 m flatMap unit => m。 以 Scala 的 List 


Monad iL, 3X4 VATPHSList(1,2,3) flatMap (x -» List(x)) -- List(1,2,3)., 
(2) 左 单位 元 ( unit )。 即 对 于 任意 Monad m， 有 unit(v) flatMap f => f(v)。 换 成 Scala 
$jJList Monad > (00 flatMap (x -» f(x)) -- f(100), E'Ff 


SEEN Tod Sets 

(3) 结合 律 。 即 对 于 任意 Monad m， 有 m flatMap g flatMap h => m flatMap (x => 
g(x) flatMap h}。 这 个 定律 告诉 我 们 运算 的 结果 取决 于 运算 顺序 ， 但 不 受 误 套 的 影响 。 作 
为 练习 ， 读 者 可 以 在 Scala List 身 上 验证 一 下 这 个 定律 。 


2. Monad 如 何 降低 非 本 质 复杂 性 

代码 清单 6-24 中 使 用 Java 编 写 的 例子 是 Web 交 易 应 用 中 的 一 个 典型 操作 。 我 们 赁 一 个 键 从 
HttpReduest 或 HttpSession 中 取出 对 应 的 值 。 我 们 取出 来 的 这 个 值 是 某 一 笔 交 易 的 编号 ， 用 
这 个 编号 可 以 从 数据 库 中 查询 到 具体 的 交易 ， 获 得 对 应 的 Trade 对 象 。 
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代码 清单 6-24 Java 对 运算 中 分 文 路 径 的 处 理 方式 
String param(String key) { 
P 
return value; | 从 请 求 或 会 话 获取 参数 信 
} 


Trade queryTrade(String ref) { 

// 查询 -— 

return trade E 执行 数据 库 查 询 
} 


public static void main(String[] args) { 
String key; 
// 设置 要 获取 的 键 


String refNo = param(key); 


lt (refNo == null) d 
// 异 常 处 理 
j 检查 空 值 
Trade trade = queryTrade (refNo); 
If (trade == null) 4 
// 异 常 处 理 


} 
| 


这 上段 代码 表现 出 一 定 程 度 的 非 本 质 复 灯 性 人 @, 对 抽象 的 表面 语法 造成 了 污 梁 。 在 这 段 从 上 下 
文 参数 获取 领域 对 象 的 运算 中 ， - 步 都 要 执行 空 值 检查 ， 且 每 次 检查 都 是 显 式 进 行 的 。 代 人 三 清 
单 6-25 中 的 Scala 代 人 码 与 上 面 的 代码 功能 完全 相同 ,但 利用 了 Scala 的 Monad 化 语法 结构 for 


comprehension。 




















代码 清单 6-25 ”Scala 的 Monad 化 语法 结构 for comprehension 


def param(key: String): Option[String] = { au 
//.. 


l Monad 化 的 返回 
def queryTrade(ref: String): Option[Trade] = { 
T4 
i 
def main(args: Array[Stringl) { 


val trade - 
( 

for { 

r <- param("refNo") e Monad 化 的 返回 值 
t <- queryTrade (r) 

j 

yield t 
) getOrElse ertror ( "not found") 


jus 


main 方 法 中 的 Monad 化 结构 最 终 怎 么 串联 起 来 , 创建 出 trade 对 和 象 , 对 此 我 们 进行 详细 分 析 。 
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pazram 返 回 的 option[Stzindg] Q x — 1 Monad, 按照 Scala 的 设计 ， Option[] 用 于 表示 一 
则 有 可 能 不 产生 任何 结果 的 运算 。queryTrade 返 回 的 option [Trade] @ 也 是 一 个 Monad, 只 不 
过 它 的 类 型 不 同 于 option [string] 。 我 们 希望 两 步 运算 的 串联 满足 一 定 的 条 件 ， 即 当 param 返 
回 空 值 时 ，queryTrade 必 须 不 被 调用 。 代 码 清 单 6-24 用 了 显 式 的 空 值 检查 来 实现 这 样 的 条 件 。 
而 这 里 因为 利用 了 Monad 化 结构 ， 让 option[] 在 其 实现 内 部 负责 空 值 检查 的 例 行 工 作 ， 表 面 上 
的 代码 得 以 保持 简介 ， 摆 脱 了 非 本 质 复 林 性 人 @。 

Monad 是 怎么 串联 两 步 运算 的 呢 ?” 是 通过 本 市 补充 内 容 中 介绍 的 Monad 三 要 系 之 一 一 一 
pbind 操 作 。bing 操 作 在 Scala 语 言 中 被 实现 为 flatMap 组 合子 ， 而 for comprehension 人 @@ 只 不 过 是 
包 蛙 在 flatMap 外 面 的 一 层 语 法 糖 ， 从 下 面 的 代码 片段 可 以 看 穹 这 一 点 。 

Flit for comprehension 糖 衣 ， 里 面 掩盖 着 的 binq 操 作 就 清楚 地 显露 出 来 了 。 


param("refNo") flatMap {r => 









































queryTrade(r) map {t => 
t)? getOrElse errorí("not found") 


flatMap 组 合子 ( 等 价 于 Haskell 的 >>= 操 作 ) 在 片段 中 起 到 一 种 承上启下 的 作用 ,重要 的 binq 
操作 将 param 的 输出 对 接 到 queryTrade 的 输入 , 同时 在 操作 内 部 处 理 所 有 必要 的 空 值 检查 。for 
comprehension 在 flatMap 组 合子 的 基础 上 提供 更 高 阶 的 抽象 ， 进 一 步 改 善 DSL 的 可 读 性 和 表达 
能 力 。 

对 Monad、flatMap 和 for comprehension 的 深入 讨论 超出 了 本 书 的 范围 。 目 前 来 说 ， 只 要 知 
道 Monad 化 结构 和 操作 能 简化 DSL 的 实现 就 可 以 了 了。 我们 刚刚 用 Monad 作 为 手段 ， 在 不 引入 非 本 
质 复 杂 性 的 前 提 下 , 对 存在 依赖 天 系 的 运算 进行 排序 。 这 只 是 Monad 最 普通 不 过 的 一 种 用 法 而 已 。 
除 此 之 外 ，Monad 还 广泛 用 作 一 种 机 制 ， 解释 纯 函数 式 硬 言 的 副作用 ， 人 处 理 状 态 变 化 、 异 第、 
continuation 等 运算 。 显 然 ，Monad 的 这 些 用 法 都 可 以 用 来 改善 DSL 的 表现 力 。Scala 语 言 中 Monad 
的 更 多 详细 信息 请 参考 6.10 节 文献 [10]。 

为 了 给 讨论 画 上 一 个 漂亮 的 句号 ,我们 最 后 用 一 个 例子 来 说 明 Monad 如 何 提 高 DSL 抽 象 的 表 
现 力 。 这 个 例子 是 对 代码 清单 6-20 中 交易 处 理 流 程 DSL 的 重新 实现 ,但 我 们 用 Monad 化 的 for 
comprehension 取 代 原 来 的 偏 洱 数 来 排列 操作 的 顺序 。 这 个 练习 目的 是 让 你 学 会 用 Monad 的 思维 去 
构建 DSL。 我 们 会 尽量 让 例子 保持 简单 , 仅 针对 性 地 演示 应 该 怎样 设计 各 步 运算 , 以 便于 通过 for 
comprehension 进 行 串 联 。 

3. 设计 Monad 化 的 交易 DSL 

不 再 多 说 ， 我 们 这 就 换 一 种 方式 重新 定义 代码 清单 6-17 的 TradeDs1。 修 改 后 ， 所 有 的 流程 
方法 都 不 再 返回 PartialFunction， 而 是 分 别 返 回 一 个 Monad ( Option[] )。 












































代码 清单 6-26 ”Monad 化 的 TradeDs1l 


package monad 


import api. 

class TradeDslM { 
def validate(trade: Trade): Option[Trade] = //.. 
def enrich(trade: Trade): Option[Trade] = //.. 
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def journalize(trade: Trade): Option[Trade] = //.. 
j 


object TradeDslM extends TradeDslM 
用 一 个 for comprehension 套 住 上 面 的 DSL， 即 可 对 一 个 交易 的 集合 调用 流程 方法 组 成 的 序列 : 
import TradeDslM. 


val trd = 
for { 
trade <- trades 
trValidated <- validate (trade) 
trEnriched <- enrich(trValidated) 
trFinal «- journalize(trEnriched) 


j 
yield trFinal 


ER T PU MonadB Ze TRIES ERU EEAPE TR, rxERHUSEIZJISE- TU ISRe-20fHIH], EET 
Am PECES] SEE H Be ER C27 5e 4 S HJTRTE. Tli Ec for comprehension 里 面 的 操作 序列 , 前 后 操 
作 的 类 型 并 不 完全 一 致 。 trades 是 Iterable 类 型 的 List， 每 次 授 代 它 都 产生 一 个 Trade 对 和 象 。 
我 们 并 不 需要 特意 检查 列表 的 结尾 ,因为 List 也 像 option[] 一 样 是 个 Monad, 其 内 部 的 flatMap 
组 合子 会 处 理 好 类 似 的 边界 条 件 。 validate 返 回 一 个 option [Trade] 可 能 是 some ( trade) ， 
也 可 能 是 None。 当 validate 的 输出 被 送信 enrich 时 ,不 需要 做 任何 显 式 的 空 值 检查 ， 也 不 需 
要 进行 任何 option[Trade] -> Trade 显 式 转换 。 只 要 串联 用 的 管道 是 List [] 、Option[] 等 
Monad 化 构造 ，flatMap 组 合子 会 目 动 完 成 所 有 的 绑 定 。 从 这 个 意义 上 说 ， 通 过 Monad 绑 定 来 串 
联 操 作 ， 比 代码 清单 6-17 通 过 偏 函 数 来 串联 效果 更 好 。 如 来 设计 得 当 ，Monad 化 的 操作 可 以 成 就 
表现 力 强 的 DSL， 配 合 Scala 的 for 表 达 式 (或 Haskell 的 do notation ) 语法 糖 一 起 使 用 ， 效 果 尤 佳 。 

如 果 你 想 知 道上 面 片 段 的 flatMap 展 开 形 式 ， 它 是 下 面 这 个 样子 的 : 

trades flatMap {trade => 

validate(trade) flatMap {trValidated => 


enrich(trValidated) flatMap {trEnriched => 
journalize(trEnriched) map {trFinal => 

















trFinal 
} 
} 
} 
} 


显然 这 种 写法 的 编程 味道 要 浓 很 多 ， 还 是 之 前 用 for 语 句 的 版 本 更 适合 领域 用 户 阅 读 。 

读 完 本 市 ,你 知道 Monad 是 Scala 提 供 的 为 一 种 抽象 组 织 手 段 。 它 与 仿 怨 数 有 细微 的 差别 。 它 
能 用 一 种 纯 数 学 的 方式 ， 把 抽象 按照 依赖 关系 串 联 起 来 。Scala 目 市 了 不 少 Monad 化 的 构造 单元 ， 
设计 DSL 时 别 乐 了 善 用 这 些 素材 。 











6.9 hi 


Scala 社 群 热 表 于 DSL 事 出 有 因 。Scala 作 为 现今 最 具有 影响 力 的 编程 语言 之 一 ， 为 设计 宣 有 表 
现 力 的 DSL 提 供 了 一 流 的 支持 。 








176 第 6 章 ”Scala 语言 中 的 内 部 DSL 设计 








本 章 已 经 逐一 展示 能 用 于 内 部 DSL 设 计 的 Scala 语 言 特性 。 我 们 从 一 份 Scala 特 性 名 单 开 始 ， 
然后 通过 分 析 证 券 交 易 领 域 的 众多 DSL 片 段 ， 认 真 深入 分 析 这 些 DSL 片 段 的 设计 。 从 结构 上 说 ， 
DSL 是 底层 实现 模型 上 的 一 重 门面 。 本 章 的 讨论 焦点 在 领域 模型 与 它 上 的 语言 抽象 之 间 来 回 
切换 。 

DSL 需 要 在 契约 层次 上 表现 出 它 的 组 合 能 力 ， 避 免 肾 露 任何 实现 细节 。 你 的 设计 从 一 开始 就 
要 遵循 这 样 的 原则 ， 因 为 不 同 的 DSL 有 不 同 的 发 展 步调 ， 需 要 修改 某 一 个 DSL 的 实现 时 ， 不 要 影 
响 其 他 DSL 或 者 核心 应 用 , 我 们 还 介绍 了 不 同 的 Scala 内 部 DSL 之 间 , 怎样 利用 Scala 强 大 的 类 型 系 
统 ， 静 态 地 组 合 到 一 起 。 在 最 后 阶段 的 讨论 中 ,我 们 观察 了 Monad 化 的 操作 怎样 帮助 创建 具有 组 
合 能 力 的 DSL 构 造 单元 。Monad 在 Scala 语 言 中 的 位 置 并 不 像 它 在 Haskell 编 程 模型 中 的 地 位 那么 显 
著 , 但 用 处 并 不 小 。Scala 的 Monad 化 语法 for comprehension 可 以 用 来 排列 领域 操作 的 顺序 ， 同时 
不 引入 过 多 的 非 本 质 复杂 性 。 











要 点 与 最 佳 实践 
口 Scala 语 法 简练 ， 可 省 略 句 末 分 号 ,具备 类 型 推断 特性 。 这些 特性 可 以 使 DSL 的 表面 语法 
保持 紧凑 。 
口 Scala 有 丰富 的 语言 构造 可 作为 设计 抽象 的 手段 ， 请 充分 利用 类 、trait、 对 象 等 元 件 去 提 
高 DSL 实 现 的 扩展 能 
口 Scala 提 供 了 强大 的 函数 式 编程 能 力 。 请 善 用 这 种 能 力 来 对 DSL 中 的 行为 进行 抽象 。 摆脱 
对 象 范 式 的 钵 圈 ， 使 DSL 实 现 对 用 户 的 表现 力 更 强 。 


内 部 DSL 和 需要 一 种 和 宿主 语言 ， 有 时 会 受到 和 宿主 语言 能 力 的 限制 。 打 破 这 些 限 制 的 方法 之 一 是 
自己 设计 一 种 外 部 DSL。 下 一 章 将 探讨 外 部 DSL 的 若干 基本 构件 。 从 编译 器 和 话 法 分 析 器 的 一 些 
基本 理论 和 人 手 ， 然 后 过 渡 到 分 析 需 组 合子 (parser combinator ) 等 日 前 广泛 使 用 的 高 阶 结 构 。 裤 
请 期 竺 ! 
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外 部 DSL 的 实现 载体 





本 章 内 容 

O 外 部 DSL 的 处 理 流 程 

O 语法 分 析 带 的 分 类 

a 用 ANTLR 开 发 一 种 外 部 DSL 

O Eclipse Modeling Framework SXtext 








外 部 DSL 跟 内 部 DSL 一 样 ， 都 是 在 已 有 的 领域 模型 外 面 禾 善 一 层 抽 象 ， 差 别 在 于 怎样 实现 这 
层 抽 和 象 。 外 部 DSL 会 自行 建立 一 套 语 言 处 理 设施 ， 包 括 语法 分 析 器 、 词 法 分 析 需 和 处 理 逻 辑 。 

我 们 的 讨论 将 从 外 部 DSL 处 理 设施 的 整体 架构 开始 。 内 部 DSL 可 以 借用 簿 主语 言 的 基础 设 
施 ， 而 外 部 DSL 需 要 从 头 开 始 构建 它们 。 第 一 步 我 们 打算 手工 编写 一 个 语法 分 析 硕 ， 然 后 使 用 
ANTLR 语 法 分 析 需 生成 锅 开 发 你 的 第 一 个 目 定义 外 部 DSL。 本 草 的 最 后 一 节 会 介绍 另 一 种 外 部 
DSL 开 发 范式 一 一 在 外 部 DSL 开 发 环境 Xtext 的 文 持 下 ， 基 于 EMF (Eclipse Modeling Framework ) 
的 模型 驱动 方式 。 图 7-1 是 本 章 讨论 进程 的 路 线 图 。 

剖析 外 部 DSL 的 构造 


。 基础 设施 的 主要 组 成 部 分 
。 语义 模型 的 产生 和 填充 

















语法 分 析 妖 的 分 类 





为 什么 外 部 DSL 需 要 Xtext 设 计 一 个 外 部 DSL 
一 个 语法 分 析 器 

。 语 法 分 析 器 生成 器 

。 语 法 制导 翻译 

。 使 用 ANTLR 的 示例 


图 7-1 ”本章 路 线 图 
本 章 将 学 习 利 用 能 从 市 面 上 获得 的 工具 开发 一 父 语 言 处 理 基 础 设施 。 有 了 这 些 基 础 设施 ,就 








可 以 用 它 开 发 目 定 义 DSL 语 言 处 理 程序 。 
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7.1 解剖 外 部 DSL 


1.5 节 粗略 描绘 过 在 自 定义 语言 基础 设施 的 基础 上 , 构建 外 部 DSL 的 情况 。 本 节 将 从 细节 上 探 
讨 DSEL 的 架构 怎样 随 着 它 所 描述 的 领域 模型 而 发 展 变化 , 期 间 还 会 讨论 供 设计 者 选择 的 实现 选项 
VJ A nf CS s 


7.1.1 最 简单 的 实现 形式 


我 们 从 外 部 DSL 最 简单 的 实现 形式 说 起 。DSL 的 目 定 义 语 法 需要 有 配套 的 语法 分 析 需 。 分 析 
引擎 首先 对 输入 流 进行 词法 分 析 ， 将 其 转化 为 可 识别 的 词法 单元 〈token )。 词 法 单元 在 语法 上 也 
称 为 终结 符号 (terminal )。 随后 这 些 词法 单元 作为 语法 正确 的 语句 ,被 送 入 产生 式 规 则 ( production 
rule) 进行 处 理 。 整 个 过 程 如 图 7-2 所 示 。 


DSL 脚 本 语法 分 析 
基础 设施 目标 操作 









。 词法 分 析 
。 语法 分 析 
e 抽象 语法 树 
。 代码 生成 
图 7-2 ”外 部 DSL 最 简单 的 实现 形式 。 语 法 分 析 基 础 设施 包揽 了 产生 目标 操作 所 需 的 一 
切 事 务 。DSL 脚 本 的 所 有 处 理 步 骤 〈 词 法 分 析 、 话 法 分 析 、 生 成 AST、 生 成 代 
135) 全 部 集中 在 一 个 构造 块 中 





处 理 DSL 脚 本 输入 和 生成 必要 输出 所 需 的 全 部 工作 都 由 语法 分 析 基 础 设施 来 执行 。 


EA DSL 不 一 定 需 要 非常 复杂 精密 的 语法 分 析 基 础 设施 。 对 于 简单 的 领域 语言 ， 用 字 
符 串 处 理 器 、 正 则 表达 式 处 理 器 等 简单 的 数据 结构 来 充当 语法 分 析 引 擎 的 做 法 并 

不 罕见 。 此 时 将 词法 分 析 、 语 法 分 析 、 代 码 生 成 等 操作 步骤 整合 到 一 起 往往 是 合理 的 。 

图 7-2 的 设计 无 法 很 好 地 适应 较 复 杂 的 情况 。 在 需求 很 简单 ， 且 复杂 性 不 会 增加 的 情况 下 ， 
我 们 可 以 为 语言 处 理 基础 设施 选择 这 种 大 包 大 揽 的 实现 形式 。 可 惜 世 界 上 的 问题 不 都 是 简单 的 。 
下 一 节 将 会 介绍 ,解决 复杂 性 的 唯一 途径 是 用 不 同 模块 实现 不 同 任务 ,并 且 引 入 适当 程度 的 抽象 。 
7.1.2. ”对 领域 模型 进行 抽象 


图 7-2 中 全 能 的 语法 分 析 基 耐 设 施 把 产生 目标 输出 所 需 的 一 切 处 理工 作 都 放 在 一 个 盒子 里 完 
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成 。 前面 提 到 ， 这 种 设计 难以 适应 二 言 复杂 性 增加 的 情况 。 以 一 个 不 算 复 杂 的 DSL 来 说 ,该 设施 
至 少 需 要 在 它 的 单个 抽象 单元 内 执行 以 下 任务 。 

a 依据 一 父 请 法 规则 对 输入 进行 分 析 。 

a 语言 经 过 分 析 后 被 保存 为 ASTI 的 形式 。 较 为 和 测 单 的 场合 可 以 省 略 生成 AST 的 步 又, 直接 在 

语法 中 航 入 目标 操作 。 

O 对 AST 进 行 标注 ， 将 其 充实 为 中 间 表 示 ， 为 执行 目标 操作 做 好 准备 。 

O 处 理 AST， 执 行 代码 生成 等 目标 操作 。 

让 一 个 抽 旬 单元 夭 担 这 么 多 职责 ， 负 担 实在 太 重 了 。 我 们 想 一 想 有 没有 解决 的 办 法 。 

1. 模块 化 
































我 们 可 以 试 着 从 大 盒子 里 分 离 出 来 一 部 分 职责 ， 让 设计 变 得 模块 化 一 些 。 图 7-3 是 一 种 分 法 。 
"M C L (核心 的 语法 分 析 ) 
。 对 输入 的 DSL 脚 本 进行 语法 分 析 
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图 7-3 ”对 图 7-2 大 中 盒子 包含 的 四 项 职责 进行 分 解 ， 分 离 任 务 。 虚 线 转 起 来 的 
部 分 分 别 代表 一 项 功能 


语法 分 析 是 图 7-3 的 核心 功能 之 一 ， 应 该 用 一 个 独立 的 抽象 来 表示 。 语 法 分 析 的 结果 之 一 目 
然 是 产生 一 棵 AST。AST 以 一 种 独立 于 语言 语法 的 形式 ， 呈 现 语 言 的 结构 化 形态 。 根 据 AST 在 下 
一 阶段 的 用 途 和 处理 要 求 ， 我 们 需要 为 它 增加 其 他 信息 ， 如 对 象 类 型 、 标 注 等 上 下 文 标记 。 增 加 
了 这 些 信息 的 AST 逐 渐 积 累 语 言 的 语义 信息 。 

2. 语义 模型 

在 为 某 一 领域 设计 DSL 的 过 程 中 , 充实 后 的 AST 成 为 该 领域 的 语义 模型 。 图 7-3 前 两 部 分 之 所 
以 出 现 重 全 ,是 因为 核心 语法 分 析 过 程 要 产 出 菜 种 数据 结构 。 

然后 由 下 一 阶段 的 处 理 过 程 向 该 数据 结构 注入 领域 知识 。 于 是 完整 流程 就 如 图 7-4 所 示 ， 我 
们 可 以 将 领域 的 语义 模型 作为 DSL 人 处理 流程 中 的 一 个 核心 抽象 。 
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fms 目标 操作 


。 词法 分 析 。 充实 后 的 领域 模型 
。 语法 分 析 e 目 底 向 上 发 展 
。 由 语法 分 析 器 产生 和 填充 
图 7-4 我 们 将 图 7-2 的 语法 分 析 设 施 基 础 设施 盒子 拆 分 成 两 个 抽象 。 语 法 分 析 需 负责 核心 
的 语法 分 析 。 语 义 模 型 从 语法 分 析 引 擎 中 独立 出 来 ， 成 为 单独 的 抽象 。 语 义 模 型 
封装 了 所 有 的 领域 相关 事项 ， 预 备 提交 给 后 续 负 责 生成 目标 操作 的 设施 


语义 模型 是 DSL 脚 本 处 理 后 产生 的 、 增 加 了 领域 语义 的 数据 绪 构 。 它 的 绪 构 与 DSL 的 语法 无 
K, 更 多 地 反映 了 系统 的 解答 域 模 型 。 语 义 模型 作为 一 层 完 美的 抽象 ， 分 离 了 输入 的 语法 导 回 的 
脚本 结构 与 为 一 边 的 目标 操作 。 

DSL 人 处 理 流程 的 目标 输出 有 很 多 功能 。 它 可 以 直接 生成 应 用 代码 。 它 也 可 以 生成 一 些 资源 ， 
供应 用 运行 时 使 用 和 解释 ， 比 如 Hibernate 用 来 产生 数据 模型 的 对 象 -关系 映射 文件 。Hibernate 是 
一 种 ORM ( 对 象 -关系 -映射 ) 框架 。 详 情 请 参阅 http://www.hibernate.org。 语 义 模型 使 上 下 层 保 
持 分 离 ， 同 时 独 目 充当 所 有 必要 领域 功能 的 供应 仓库 。 

拥有 一 个 设计 得 当 的 语义 模型 ， 对 于 提高 应 用 的 可 测试 性 大 有 好 处 。 因 为 我 们 可 以 脱离 DSL 
的 语法 层 , 单独 测试 应 用 的 整个 领域 模型 。 下 面 就 来 更 详细 地 讨论 一 下 语义 模型 ,观察 它 是 走样 
在 外 部 DSL 的 开发 周期 中 逐渐 形成 的 。 

3. 填充 语义 模型 

语义 模型 是 供应 领域 模型 的 仓库 。 语 法 分 析 融 一 边 消耗 DSL 脚 本 的 输入 流 , 一 边 填 充 语义 模 
型 。 语 义 模 型 的 设计 完全 独立 于 DSL 语 法 ， 而 且 模 型 的 构成 方式 和 内 部 DSL 一 样 ， 由 一 些 更 小 的 
抽象 自 底 回 上 组 合 起 来 。 图 7-5 形 象 说 明了 语义 模型 怎样 由 下 至 上 逐渐 形成 一 个 汇集 领域 结构 、 
属性 和 行为 的 仓库 。 

外 部 DSL 这 种 边 做 语法 分 析 ， 边 填充 语义 模型 的 方式 ， 正 是 它 与 内 部 DSL 的 区 别 所 在 。 我 们 
在 构造 内 部 DSL 时 ， 先 在 答 主 语言 中 建立 较 小 的 抽象 ， 然 后 通过 答 主 语言 本 里 的 组 合 功 能 ， 建 立 
更 大 的 抽象 。 而 对 于 外 部 DSL 来 说 ， 对 语言 的 语法 分 析 与 产生 较 小 的 抽象 同步 进行 , 分 析 树 成 长 
壮大 ， 意 味 着 语义 模型 凝聚 了 更 多 的 血肉 ， 成 为 领域 知识 的 具体 表示 。 

产生 语义 模型 之 后 , 我们 用 它 来 生成 代码 ,操作 数据 库 , 或 者 继续 生成 其 他 应 用 组 件 所 需 的 
模型 。 现 在 回头 看 看 图 7-4 的 DSL 处 理 架 构 , 听 完 前 面 的 讲解 ,你 是 否 相 信 了 拆 分 抽象 的 好 处 呢 ? 

以 架构 的 角度 来 说 ， 内 部 和 外 部 DSL 都 是 建立 在 语义 模型 上 面 的 一 层 抽象 。 内 部 DSL 借 用 了 
箔 主语 言 的 语法 分 析 禹 ,公布 给 用 户 的 浪 约 只 是 包 在 语义 模型 外 表 的 薄 薄 一 层 关 饰 。 外 部 DSL 需 
要 自行 构建 相关 设施 去 解析 DSL 肢 本 并 执行 一 些 操作 ， 执 行 的 结果 是 填充 了 语义 模型 。 







































































182 第 7 章 ”外 部 DSL 的 实现 载体 


a 更 大 规模 的 语义 模型 
汇集 领域 结构 和 iX 
组 合 


领域 行为 的 仓库 


pt i tt 


xix LLL 
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图 7-5 语义 模型 由 众多 较 小 的 领域 抽象 自 底 癌 上 组 合 而 成 。 我 们 先 发 展 出 各 种 领域 实体 
的 抽象 ， 即 虚线 框 中 的 小 抽象 单元 ， 然 后 把 它们 一 层 一 层 地 组 合成 更 大 的 实体 ， 
最 后 得 到 一 套 完 整 的 领域 抽象 ， 也 就 是 我 们 的 语义 模型 


语法 分 析 器 在 外 部 DSL 的 处 理 设施 中 负责 识别 DSL 脚 本 语法 。 各 种 形式 的 语法 分 析 器 和 词法 
分 析 器 需要 用 到 不 同 的 实现 技术 ， 掌 握 这 些 技术 是 学 习 外 部 DSL 开 发 的 重要 一 环 。 

下 一 节 将 讨论 语法 分 析 技术 。 我 们 并 不 打算 详细 论述 语法 分 析 器 实现 , 而 会 在 大 致 了 解 之 后 ， 
介绍 几 种 语法 分 析 技术 及 其 所 针对 的 语法 类 别 。 选 择 最 合适 的 工具 ( 如 语法 分 析 器 生成 器 ) 开发 
外 部 DSL 时 ， 不 见得 需要 完全 了 解 分 析 器 是 怎么 实现 的 。 当 然 ， 设 计 不 同类 别 的 语言 有 不 同 程度 
的 知识 要 求 , 多 知道 一 些 分 析 器 的 实现 技术 总 是 有 用 的 。 本 章 末 尾 列 出 的 参考 文献 可 以 作为 学 习 
这 方面 知识 的 向 导 。 


7.2. 语法 分 析 器 在 外 部 DSL 设计 中 的 作用 


行 执 行 的 DSL 脚 本 被 送 入 词法 分 析 天 ,经 过 词法 分 析 表 的 处 理 ， 输 入 流 被 划分 为 博 法 分 析 珊 
能 理解 的 的 可 识别 单元 。 当 语法 分 析 融 顺利 处 理 完 全 部 输入 流 ,， 到 达 一 个 成 功 的 终结 状态 , 我 们 
就 说 该 语法 分 析 帮 识别 了 输入 的 语言 。 图 7-6 是 这 个 过 程 的 图 解 。 

一 提起 词法 分 析 天 和博 法 分 析 融 ,我 们 总 是 不 由 目 主 地 想 得 很 复杂 ,实际 上 并 非 如 此 。 它们 
的 复杂 度 取决 于 你 所 设计 的 语言 。 前 面 提 到， 假如 DSL 足 够 简单 ， 我 们 甚至 不 必 区 分 词法 分 析 阶 
段 和 请 法 分 析 阶 段 。 一 个 通过 正则 表达 陈 来 操作 调整 输入 脚本 的 字符 串 处 理 末 ,就 足以 承担 全 部 
的 解析 工作 。 人 简单 的 语言 可 以 徘 手 工 编写 分 析 人 各 ,与 之 相对 ,更 复杂 一 些 的 语言 需要 借助 一 些 专 
业 的 开发 设施 。 下 面 就 介绍 如 何 使 用 生成 语法 解析 右 的 基础 设施 ,来 构建 面向 复杂 DSL 的 语法 解 
Briss o 
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成 一 棵 语法 分 析 树 


词法 分 析 器 | ”| 语法 分 析 器 


取 下 一 个 词法 单元 


图 7-6 ”语法 分 析 过 程 。DSL 脚 本 被 送 入 词法 分 析 融 去 划分 词法 单元 ， 绪 末 送 入 语法 分 析 策 
7.2.1 ”语法 分 析 器 、 语 法 分 析 器 生成 器 

我 们 所 设计 的 语法 分 析 帮 , 实质 是 对 语言 语法 的 一 种 抽象 。 如 有 果 我 们 打算 手工 编写 整个 分 析 
希 ， 那 么 需要 做 这 两 件 事 情 : 

口 定义 语言 的 BNF 语 法 ; 

口 编写 与 该 语法 对 应 的 语法 分 析 规 。 

然而 手工 编写 有 一 个 网 病 ， 这 样 写 出 来 的 全 部 场 法 都 般 入 到 了 代码 中 。 对 语法 的 任何 修改 ， 
都 意味 肴 也 要 对 相应 的 实现 代码 进行 大 幅 修改 。 这 种 情况 是 实施 编程 的 抽象 层次 过 低 的 典型 表现 
(附录 A 有 详细 解释 )。 

XT d ZEB PIS. 利用 语法 分 析 硕 生成 规 要 比 直 接手 与 更 好 一 些 。 语 法 分 析 需 生成 
全 可 以 提高 我 们 实施 编程 的 抽象 层次 。 我 们 只 需要 定义 这 两 样 东 西 : 

口 按 Extended Backus Naur Form ( EBNF ) 语法 格式 书写 的 语法 规则 ; 

OQ 当 语 法 规则 识别 成 功 时 ， 和 硕 望 执行 的 目 定 义 操作 。 

在 运用 生成 硕 的 情况 下 , 实现 目 定 义 语法 分 析 需 的 基础 代码 完全 封 痛 在 生成 带 内 部 。 错 误 处 
理 、 生 成 分 析 树 等 一 般 事务 成 为 内 建 在 生成 右 内 部 的 标准 例 程 , 无 论 我 们 创建 什么 样子 的 语法 分 
Brus, IUS MIR. 

VERE ATUS E Uds E 2J— Pipe E EAR UKIHSCN, RERA Zu EE, 减轻 编写 、 管 
理 、 维 护 的 负担 。 另外, TRE IE Nn BE PE TP ET RH BIBT eR, 这 也 是 重要 的 优点 。 
表 7-1 汇 总 了 目前 第 用 的 几 种 生成 硕 。 

除了 表 7-1 列 出 来 的 这 几 种 生成 名 ， 还 有 原 Sun Microsystems 公 司 开 发 的 Java Compiler 
Compiler ( JavaCC ， 见 https://javacc.dev.java.net/ ) 和 IBM 公 司 开 发 的 Jikes Parser Generator ( 见 
http:/www10.software.ibm.com/developerworks/opensource/jikes/project/ )。Jike 和 JavaCC 生 成 的 都 
征 Java 人 代码 的 语法 分 析 带 ， 其 功能 也 都 类 似 于 YACC 和 Bison。 

无 论 产 生 霹 法 分 析 禹 的 途径 是 手工 编写 , 还 是 由 生成 带 产 生 , 指导 语法 分 析 帮 行为 的 始终 是 
你 所 用 语言 的 语法 。 当 分 析 右 成 功 识别 了 语言 ， 它 会 产生 一 标语 法 分 析 树 ,将 整个 识别 过 程 封 淡 
到 这 个 递归 的 数据 结构 里 面 。 如 果 我 们 在 语法 规则 上 附加 了 上 自 定 义 动作 , 那么 最 后 生成 的 分 析 树 
也 会 增加 这 些 视 外 信息 ， 形 成 语义 模型 。 接 下 来 我 们 用 ANTLR 做 一 次 示范 ， 看 看 生成 名 怎样 把 
目 定 义 语 法 翻译 成 领域 语义 模型 。 
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表 7-1 当前 存在 的 语法 分 析 器 生成 器 


YACC LEX 属于 UNIX 发 布 版 的 一 部 分 (最 早 开 发 于 1975 年 ) ， 生 成 C 语 
言 编写 的 语法 分 析 器 
Bison Flex 属于 GNU 发 布 版 的 一 部 分 , 功能 儿 乎 与 YACC 和 LEX 相 同 , 但 


能 生成 C++ 语言 编写 的 语法 分 析 融 
ANTLR ( 见 http://antlr.org ) ”已 包含 在 ANTLR 内 H Terrance Parr 开 发 。 能 生成 多 种 语言 编写 的 语法 解析 硕 ， 包 
括 Java、C、C++、Python 、Ruby 等 语言 


Coco/R 自动 生成 词法 扫描 需 ”Coco 有 是 一 种 编译 需 生 成 器 ， 将 一 种 源 语言 的 属性 语法 
( scanner ) ( attributed grammar ) 输入 给 它 ， 它 会 生成 该 语言 的 词法 扫描 


f& (scanner) FEAS A 
7.2.2 ”语法 制导 翻译 


外 部 DSL 实 现在 处 理 一 段 脚本 时 ， 首 先 要 识别 脚本 中 的 语法 ， 然 后 经 过 解析 和 翻译 ,产生 语 
义 模 型 。 语 义 模 型 充当 领域 操作 的 仓库 ， 供 给 后 绫 的 程序 使 用 。 那 么 如 何 识 别 语法 呢 ? 表 7-2 说 
明 ， 要 想 成 功 识 别 ， 我 们 需要 准备 两 套 材 料 。 

表 7-2 识别 DSL 语 法 

Hg uH 作 H 
一 套 上 下 文 无 关 语法 。 它 ”语法 规定 了 撰写 DSL 的 结构 形式 。 只 有 按照 文法 规则 定义 写成 的 DSL 脚 本 才 是 有 效 的 
的 意义 是 决定 娜 些 产 生 注意: 本 节 的 所 有 例子 都 用 ANTLR 生 成 器 来 定义 语法 
式 是 有 效 的 
一 套 语义 规则 ， 作 用 对 象 ”在 每 一 条 语法 规则 里 ， 我 们 可 以 进一步 定义 一 些 操 作 ， 当 语法 规则 被 识别 时 执行 。 操 
是 语法 识别 的 符号 的 属 ” 作 可 以 是 生成 语法 分 析 树 ， 也 可 以 是 生成 其 他 任意 的 触发 行为 ， 只 要 与 被 识别 的 规则 
性 。 这 些 规 则 在 生成 语义 ”相关 即 可 。 这 些 操作 很 容易 定义 。 任何 一 种 语法 分 析 器 生成 器 都 介 许 在 DSL 语 法 的 定义 
模型 时 发 挥 作用 中 舰 入 其 他 语言 的 代码 。 例 如 ANTLR 可 以 租 入 Java 人 代码，YACC 可 以 内 舰 C 代 码 











图 7-7 展 示 了 语法 规则 及 其 附带 的 自 定 义 操 作 如 何 经 过 语法 分 析 顺 生成 右 的 处 理 ， 最 后 变 成 
语义 模型 。 

那么 ， 我 们 就 拿 不 起 眼 的 “交易 指令 处 理 DSL” 做 一 次 实习 ， 用 ANTLR 生 成 器 来 实现 其 语 
言 解 析 。 练 习 中 将 定义 词法 分 析 需 和 语法 , 并 且 在 语法 定义 里 加 入 大 二 上 自 定 义 操作 ,生成 交易 指 
令 处 理 DSL 的 语义 模型 。 

1. 预备 ANTLR 示 例 

我 们 要 定义 的 语言 类 似 于 第 2 章 用 Groovy 开 发 的 交易 指令 处 理 DSL， 而 且 还 要 更 简单 一 些 。 
这 个 例子 的 目的 是 演示 通过 语法 分 析 顺 生成 器 开发 外 部 DSL 的 步骤 。 我 们 的 工作 除了 制定 DSL 的 
语法 ， 还 要 建立 语义 模型 ， 然 后 由 语义 模型 来 生成 一 个 代表 全 部 交易 指令 的 自 定义 抽象 。 

假设 用 户 回 交易 机 构 发 出 了 一 串 交 易 指令 ， 看 上 去 是 这 个 样子 : 

buy IBM @ 100 for NOMURA 

sell GOOGLE @ limitprice = 70 for CHASE 
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EE sake 
EB F Ir 语法 分 析 DX rn 
NF 规划 一 一 | 2 站 成 器 | 一 一 一 自 定义 操作 


(语言 的 语法 ) 


人 






DSL 脚 本 | 
取 下 一 个 词法 单元 


"em m———— un a -— P  " "——— an —— "e "n an m  —n —— ene —— "  —"-——"——————— "e ^ 


语义 模型 


图 7-7 ”语法 分 析 融 生成 融 的 输入 是 语法 规则 及 其 附带 的 目 定 义 。 生 成 带 随 后 生成 词法 
分 析 融 和 语法 分 析 融 。DSL 脚 本 经 过 词法 和 语法 分 析 融 的 处 理 , 形成 语义 模型 。 
语义 模型 成 为 核心 应 用 的 一 部 分 


整 组 指令 由 格式 相同 的 硅 干 行 构成 。 我 们 首先 要 用 ANTLR 设 计 一 个 能 处 理 这 段 脚 本 的 外 部 
DSL， 然 后 生成 适当 的 数据 结构 作为 语义 模型 。 人 简单 起 见 ， 我 们 规定 每 一 行 代表 一 条 交易 指令 ， 
用 户 下 达 的 全 部 指令 构成 一 个 指令 列表 集合 。 第 一 步 从 设计 词法 分 析 痊 开始 。 词 法 分 析 硕 的 作用 
是 对 输入 脚本 进行 预 处 理 ， 使 它 成 为 一 组 可 被 语法 识别 的 符号 。 

2. 设计 词法 分 析 器 

词法 分 析 硕 谈 和 输入 流 ,， 比照 预 设 的 词法 单元 定义 , 将 输入 流 中 的 字符 组 合 转换 成 一 个 个 词 
法 单元 。 利 用 ANTLR， 可 以 在 文法 定义 中 直接 内 联 词法 规则 ， 也 可 以 将 词法 规则 单独 写 到 另外 
的 文件 。 我 们 的 例子 单独 用 一 个 文件 保存 全 部 词法 单元 定义 , 文件 名 为 OrderLexer.g。 ANTLR 用 .g 
扩展 名 来 表示 文法 定义 文件 〈g 是 grammar 的 首 字 母 )。 请 注意 ,代码 清单 7-1 在 书写 词法 单元 定义 
时 也 用 了 一 种 DSL， 其 可 谈 性 和 表现 力 都 很 优秀 。 


代码 清单 7-1 OrderLexer.g: HIANTLRZRZ7SHJDSLins]iE 2 ras 


lexer grammar OrderLexer; 








集成 到 核心 应 用 程序 
































EQ s otBEC S 

BUY. x 'buy'; 

SELL £ 'sell'; 

AT : 87. 

FOR : "rof: 

LPRICE : 'limitprice'; 

ID e pee. ceri h A ded 
INT a O a a L L 

NEWLINE : '\r'? '\a'; 

WS Ep HAC XE UE A 


间 法 规则 按 “ 贪 禁 ” 方式 匹配 。 分 析 器 在 对 输入 流 进行 匹配 时 , 会 选取 匹配 程度 最 高 的 规则 。 


4) 跳 过 空格 
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假如 遇 到 分 不 出 高 低 的 情况 , 那么 分 析 融 会 按照 规则 在 定义 文件 中 的 出 现 次 序 , 选取 最 先 出 现 的 
规则 。 

接 下 来 我 们 转 到 男 一 个 尚 待 实 现 的 方面 一 一 语言 的 语法 。 语 法 由 我 们 设计 的 语法 规则 来 决定 。 

3. 设计 语法 规则 

你 和 希望 DSL 有 什么 样 的 语法 ， 就 定义 什么 样 的 语法 规则 。 由 于 我 们 的 DSL 特 别人 简单 ， 而 且 只 
是 用 来 演示 , 所 以 尽量 省 略 错误 处 理 方面 的 功能 , 着重 突出 语法 规则 的 架构 方面 。 谈 者 可 以 从 7.6 
节 文 献 2] 了 解 ANTLR 在 语法 规则 定义 上 的 详细 做 法 ， 以 及 它 为 用 户 提 供 的 各 种 灵活 选项 。 

代码 清单 7-2 定 义 的 语法 规则 放 在 一 个 单独 的 文件 OrderParser.g 里 面 。 文件 中 描述 语法 所 用 的 
标记 方法 ， 对 于 语言 设计 者 来 说 ， 是 表达 能 力 极 为 出 色 的 EBNF 语 法 标记 。 当 将 词法 分 析 问 和 语 
法 分 析 需 与 驱动 霹 法 分 析 规 的 处 理 程序 代码 整合 在 一 起 时 ， 你 就 会 发 现 ANTLR 如 何 通过 这 些 
EBNF 描 述 , 生成 真正 的 语法 分 析 融 代码 。 生 成 语法 分 析 天 涉及 的 所 有 繁重 事务 都 由 ANTLR 和 后 成 
妖 代 入 。 开 发 者 只 需要 专心 定义 好 语言 的 语法 即 可 。 


代码 清单 7-2  OrderParserg: 用 ANTLR 编 写 的 DSL 文 法 规则 


parser grammar OrderParser; 





























optiorns-[ M 词法 分 析 器 的 引用 
tokenVocab = OrderLexer; 
9 全 部 交易 指令 
orders : Order+ EOF; 
order : line NEWLINE; 
line : (BUY | SELL) security price account; P 每 条 交易 指令 独占 一 行 
security e ID; 
limitprice : LPRICE EQ INT; 
price : AT (INT | limitprice); 
account : FOR IDs 





ASEBNFIBIZ iU S WEA zx wig e x ARRE 3| ds B Ev — T oca R 
合 全 .每 则 指令 占 一 行 ， 说 明 下 达 的 指令 详情 个。 语法 定义 文件 的 开头 部 分 有 一 个 指向 词法 分 析 
需 类 的 引用 ， 放 在 options 块 内 @@. 

ANTLR 融 有 一 个 图 形 界面 的 语言 解释 环境 ( ANTLRWorks， 见 http:/www.antlr.org/works ), 
允许 用 户 通 过 规定 的 语法 交互 地 运行 示例 DSL 脚 本 。 该 环境 会 帮 我 们 建立 分 析 树 。 如 采 文法 规则 
的 解析 出 现 异常 ， 我 们 还 可 以 在 该 环境 内 进行 调试 。 

代码 清单 7-2 指 定 的 语法 并 没有 包含 任何 霹 法 制导 翻 详 方面 的 目 定义 操作 。 这 是 故意 为 之 ， 
目的 是 让 你 领略 一 下 ANTLR 语 法 定义 提供 的 DSL 语 法 多 么 轻巧 灵 便 。 只 要 准备 好 语法 规则 ， 就 
可 以 成 功 识别 一 段 有 效 的 DSL 脚 本 ,并 不 需要 其 他 任何 东西 ! 下 一 菠 将 学 习 怎 样 在 语法 规则 中 巩 
入 Java 代 码 来 执行 目 定 义 操作 。 

4. 髓 入 其 他 语言 的 代码 作为 自 定 义 操 作 

像 代 码 清 单 7-2 那 样 的 文法 规则 , ANTLR 通 过 它 生 成 的 分 析 各 ,可 以 构建 一 棵 默认 的 分 析 
树 。 如 果 硕 望 在 分 析 树 上 增加 其 他 信息 ,或 者 希望 经 通过 分 析 DSL 脚 本 生成 为 一 个 语义 模型 ， 
那么 可 以 采用 内 骸 其 他 语言 代码 的 方式 ， 于 模型 内 添加 自 定 义 操 作 。 下 面 就 在 代码 清单 7-2 定 
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义 的 语法 规则 基础 上 , 添加 自 定 义 操作 代码 ,让 DSL 和 脚本 在 解析 后 生成 一 个 自 定义 的 Java 对 象 
人 
内 骸 代 人 码 首 先 需 要 定义 0rder 对 象 ， 这 是 一 个 简单 的 Java 对 象 (POJO )。 解 析 脚 本 后 ， 它 会 
生成 由 一 个 order 对 和 象 列表 构成 的 语义 模型 。 代 码 清单 7-3 展 示 了 航 入 语法 规则 中 的 最 终 操 作 。 


代码 清单 7-3  OrderParserg: 语法 规则 中 内 极 了 执行 目 定义 操作 的 代码 


parser grammar OrderParser; 





options { 
tokenVocab - OrderLexer; 
j 
u 设 定 内 嵌 代 码 需要 的 导入 声明 和 包 声明 
@header ( 
import java.util.List; 
import java.util.ArrayList; 


} 
zl 分 析 器 类 共享 的 代码 
Qmembers í( 

private List«Order» orders = new ArrayList«Order-»(); 

public List«Order» getOrders() ( 

return orders; 

j 

j 


orders : order EOF; Mi 构造 0rder 对 象 的 集合 
order : line NEWLINE Íforders.add($line.value);); 
line returns [Order value] 
: (e-BUY | e-SELL) security price account P 规则 有 返回 值 
{ 
Svalue = new Order (S$Se.text, S$security.value, 


Sprice.value, $account.value); 


}; 
security returns [String value]: ID {$value = $ID.text;}; 


limitprice returns [int value] 
: LPRICE EQ INT {Svalue = Integer.parseInt(SINT.text);); 


price returns [int value] : AT 


( 
INT {$value = Integer.parseInt(SINT.text);] 


limitprice {$value = $Slimitprice.value;]) 


); 
account returns [String value] : FOR ID {$value = gID.text:)]; 
如 果 读 者 不 熟悉 EBNF 风 格 的 语法 规则 描述 方式 , EAN EEA rP t ARIETES TE, 
可 以 参阅 7.6 节 文献 [2]。 注 意 ， 我 们 可 以 对 规则 定义 返回 值 @， 返 回 值 会 跟着 语法 分 析 的 进展 向 
上 传播 。 岗 套 的 运算 一 层 层 向 上 递 进 ， 最 后 形成 一 个 0rder 对 象 的 集合 @。 
order 类 的 抽象 如 代码 清单 7-4 所 示 ， 其 代码 出 于 演示 日 的 已 经 尽量 简化 。 
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代码 清单 7-4  Orderjava: Order 抽 象 


public class Order { 
private String buySell; 
private String security; 
private int price; 
private String account; 


public Order (String bs, String sec, int p, String acc) ( 
buysell = bs; 
security = sec; 
price = p; 
account = acc; 


} 


public String toString() { 
return new StringBuilder () 

.append ("Order is ") 
.append(buySell) 
.append("/") 
.append(security) 
.append("/") 
.append (price) 
.append("/") 
.append (account) 
.toString(); 


p 


l 

下 一 节 要 编写 语言 处 理 程 序 的 主 模块 ， 由 ANTLR 生 成 的 词法 分 析 絮 、 语 法 分 析 絮 ， 以 及 其 
他 任何 目 定 义 的 Java 人 代码， 都 要 在 这 里 整合 到 一 起 。 下 面 束 来 看 看 DSL 脚 本 是 怎样 被 解析 并 产生 
输出 的 。 

5. 构建 语法 分 析 器 模块 

我 们 现在 就 可 以 用 ANTLR 构 建 分 析 带 ， 与 驱动 代码 进行 集成 。 不 过 在 此 之 前 ,还 要 先 准 备 好 
驱动 代码 。 了 驱动 代码 的 任务 是 从 输入 中 取得 字符 流 ， 传 递 给 词法 分 析 副 从 而 生成 词法 单元 ， Be 
递 给 语法 分 析 带 对 DSL 脚 本 进行 识别 。 代 码 清 单 7-$ 中 的 Processor 类 就 是 这 样 的 一 段 驱 动 代码 。 


代码 清单 7-5  Processorjava: 分 析 需 模块 的 驱动 代码 


import java.10.*; 











import java.util.List; 
import org.antlr.runtime.*; 
import org.antlr.runtime.tree.*; 


public class Processor { 


4] 驱动 入 口 


public static void main(String[] args) 
throws IOException, RecognitionException { 
List«Order» os - 
new Processor().processFile(args[01]); 
tor (Order o x os) 4 


System.out.println(o); Hi 输出 指令 列表 
} 
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private List«Order» processFile(String filePath) 
throws IOException, RecognitionException í( E 从 文件 中 读 入 DSL 脚 本 
OrderParser p = 
new OrderParser( 


getTokenStream(new FileReader(filePath))); "e 
p.orders(); 语法 分 析 器 读 入 
return p.getordersi); 词法 单元 流 
j 
private CommonTokenStream getTokenStream(Reader reader) 
throws IOException { 
OrderLexer lexer = — . 
new OrderLexer(new ANTLRReaderStream(reader)); 词法 分 TARRE BURG 
return new CommonTokenStream(lexer); 词法 单元 流 


} 
} 


RANET AEA A ABAH Y ANTLR NEX, ABAE ENEAN OZ, 
随即 在 起 始 符 号 上 调用 了 orders () 方 法 ,这 个 方法 是 ANTLR 生 成 的 。 代 码 中 引用 的 所 有 类 (如 
OrderLexer、CommonTokenStream 利 OrderParser )， 要 么 是 ANTLR 根 据 语法 规则 生成 的 ， 
要 人 么 来 自 ANTLR 运 行 时 。 这 段 代码 假设 待 执 行 的 DSL 脚 本 存放 在 一 个 文件 里 面 ， 其 路 径 作 为 命 
令 行 调 用 的 第 一 个 参数 提供 。 

代码 清单 7-5 还 稍微 演示 了 一 下 语义 模型 的 用 途 ， 它 输出 语法 分 析 过 程 中 生成 的 0rder 对 象 
列表 。 如 末 在 真实 的 应 用 当中 ,我们 可 以 将 这 些 对 象 提供 给 系统 中 的 其 他 模块 ， 这 样 一 来 ，DSL 
就 与 应 用 的 核心 集成 在 一 起 了 。 

这 一 他 做 了 不 少 工作 ， 现 在 不 妨 简要 回顾 一 下 。 

6. 目前 的 成 果 

ANTLR 提 供 了 org.antlr.Tool 等 工具 类 , 负责 根据 语法 定义 文件 生成 Java 人 代码。 然后 所 有 
的 Java 类 ， 包 括 作为 目 定 义 代码 一 部 分 的 Java 类 ， 都 按照 一 般 的 构建 过 程 那样 编译 就 可 以 了 。 至 
此 ， 处 理 外 部 DSL 的 基础 设施 就 搭建 完毕 了 ， 表 7-3 对 我 们 已 完成 的 工作 做 了 一 个 小 结 。 


表 7-3 ”使 用 ANTLR 语 法 分 析 器 生成 器 构建 外 部 DSL 的 步 又 
5 mg p m" -— 
(1) 确定 词法 要 素 , 为 ANTLR 准 — [C818 RT7-18& T i]ik4rWrasOrderLexer.g. IWERI EXAT BH) dS 
备 词法 分 析 器 处 理 DSL 
注意 : 词法 分 析 需 的 定义 文件 应 该 与 语法 分 析 需 的 定义 分 开 。 单 独 存 储 的 词法 定义 
可 以 跨 语法 分 析 需 重用 
(2) 用 EBNF 标 记 编 写 文法 规则 ”代码 清单 7-2 定 义 了 DSL 的 语法 ， 定 义 文件 OrderParser.g 按 照 ANTLR 的 语法 写成 
文法 规则 的 作用 是 识别 有 效 的 DSL 语 法 ， 并 在 出 现 无 效 语法 时 给 出 异常 
































(3) 生成 傅 义 模型 代码 清单 7-3 充 实 了 语法 规则 的 定义 , 通过 择 入 自 定 义 的 Java 代 码 , 向 语法 分 析 过 程 
中 注入 了 语义 操作 。 插 入 的 一 个 个 代码 片段 ， 实 际 上 是 搭建 语义 模型 的 部 件 
(4) 收尾 代码 清单 7-4 的 自 定义 Java 代 码 完 成 对 order 抽 象 的 建 模 。 代 码 清 单 7-5 的 驱动 代码 利 


用 ANTLR 的 基础 设施 ， 将 我 们 的 DSL 脚 本 送 入 前 面 建 好 的 语法 分 析 过 程 
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经 历 了 上 面 这 些 工作 , 我 们 应 该 对 通过 语法 分 析 带 生成 右 来 构建 和 处理 外 部 DSL 的 完整 开发 
过 程 有 了 基本 了 解 。 利 用 生成 絮 来 实现 外 部 DSL 是 非常 常见 的 做 法 。 如 果 你 希望 构建 基于 自 定义 
基础 设施 的 语言 来 设计 外 部 DSL， 那 么 使 用 生成 器 是 最 适合 的 。 

ANTLR 是 一 丈 十 分 优秀 的 的 语法 分 析 带 生成 各 ,广泛 用 于 构建 各 式 分 析 带 和 DSL。 我 们 现 
在 的 成 果 只 发 挥 了 ANTLR 的 一 小 部 分 能 力 。ANTLR 能 处 理 许多 种 类 的 语法 ， 而 我 们 甚至 连 文法 的 
分 类 都 没 介绍 。 理 论 上 ,如 有 果 对 生成 的 分 析 骨 没有 效率 上 的 要 求 ,我 们 其 实 可 以 分 析 任 意 域 言 。 但 
实际 上 我 们 需要 作出 让 步 。 开 发 DSL 时 ,我们 希望 分 析 可 能 以 最 局 效 座 处 理 我 们 的 语言 。 一 球 能 处 
理 许 多 种 语言 的 通用 分 析 带 虽然 不 坏 , 但 假如 它 处 理 起 我 们 的 语言 效率 低下 , 那 对 于 我 们 就 没什么 
用 处 。ANTLR 只 是 分 析 带 生成 工具 中 的 一 种 , 它 所 生成 的 分 析 带 只 能 识别 一 部 分 特定 类 型 的 语言 。 

DSL 的 设计 者 需要 清 私 语法 分 析 表 的 一 般 分 类 ， 每 一 种 分 析 带 的 实现 难点 ， 还 有 每 一 种 分 析 
傣 能 处 理 的 语言 类 型 。 所 以 下 一 届 将 全 面 介绍 语法 分 析 带 的 分 类 及 其 实现 复杂 度 。 


7.3 语法 分 析 器 的 分 类 


当 语 法 分 析 各 成 功 识别 传递 给 它 的 输入 流 ， 就 会 为 DSL 脚 本 产生 一 标 完 整 的 分 析 树 。 分 析 此 
依据 分 析 树 市 点 的 构造 顺序 , 分 为 不 同类 别 。 有 的 分 析 各 从 根 节 点 开始 构造 分 析 树 , 称 为 自 顶 向 
T (top-down ) 分 析 闪 。 有 的 分 析 带 则 相反 ， 一 开始 先 构造 叶子 市 态 ， 然 后 偿 层 构 造 根 证 点 。 这 
JS ATUS ERAS E] J& 191 E. (bottom-up ) 1 Prs;. El Titi] PARI EUIS] E3x 82S 4p Drs FE] SCR E ZR BE AN 
E, 它们 所 能 识别 的 语法 结构 类 型 也 不 相同 。DSL 设 计 者 至 少 应 该 大 致 了 解 每 一 类 分 析 器 的 相关 
概念 。 图 7-8 分 别 展示 了 这 两 类 分 析 表 构造 分 析 树 的 过 程 。 

自 顶 癌 下 的 语法 分 析 自 底 向 上 的 语法 分 析 















































从 起 始 符号 开始 ， 遇 到 语言 规定 的 终结 符号 时 终止 从 终结 符号 开始 ， 遇 到 起 始 符号 时 终止 
图 7-8 HT] PATCR ELI IS] E43 Bras TAS 2 DTI HJ XERE 


本 市 主要 围绕 分 析 树 的 构造 方式 , 以 及 从 产生 式 规则 推导 语言 的 方式 , KENAA 





分 类 。 在 日 项 向 下 和 目 底 向 上 两 大 类 别 之 下 ,存在 着 多 种 多 样 的 变 体 , 分 别 适合 识别 不 同类 型 的 
语言 结构 , 同时 实现 复杂 度 也 有 着 相 应 的 变化 。 这 里 假设 谈 者 已 经 基本 了 解 语言 处 理 方面 的 概念 ， 
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掌握 语法 分 析 技 术 、 前 脆 处 理 ( look-ahead processing )、 分 析 树 等 基础 知识 。 如 果 需 要 了 解 这 方 
面 的 背景 知识 ， 请 参阅 7.6 节 文献 [3]。 
首先 介绍 目 项 癌 下 分 析 问 ， 学 习 其 中 一 些 常 见 的 实现 变 体 。 


7.3.1 简单 的 目 顶 向 下 语法 分 析 器 


目 顶 回 下 分 析 答 从 根 节 点 开始 构造 分 析 树 ， 回 输入 流 的 最 左 推手 (leftmost derivation ) 进行 。 
也 就 是 说 ， 分 析 种 处理 输入 的 顺序 是 从 左边 的 符 扎 到 右边 的 符号 。 

最 常见 的 和 目 顶 向 下 分 析 需 是 RD (Recursive Descent， 递归 下 降 ) 分 析 需 。 递 归 下 降 这 个 名 字 
应 该 如 何 理解 呢 ? 递归 ,说明 分 析 融 是 通过 一 系列 递归 函数 调用 实现 的 (参见 7.6 节 文献 [IH] )。 下 
降 指 的 是 分 析 树 的 构造 从 树 的 项 部 开始 ， 与 “ 目 顶 向 下 ”的 含义 相同 。 

我 们 的 学 习 过 程 将 从 最 简单 的 RD 分 析 硕 开始 ， 然 后 逐步 深 入 到 其 他 功能 更 强大 也 更 复杂 的 
分 析 硕 ， 通 过 高 效率 的 实现 识别 出 更 多 的 语言 类 。 首 先 讨 论 LLGD) 和 LLOD RDA ENE A 
顶 向 下 分 析 硕 中 最 简单 的 两 种 实现 ， 涵 盖 了 设计 外 部 DSL 所 需 的 大 部 分 功能 。 

1. LL(1T) 违 归 下 降 分 析 器 

LL(1) RD 分 析 需 依靠 一 个 前 瞻 词 法 单元 完成 对 语法 结构 的 分 析 。LL(D) 这 个 名 字 应 该 怎样 理 
解 ?第 一 个 L 表 示 分 析 硕 从 左 到 右 扫 摘 输入 字符 串 。 第 二 个 L 表 示 当 分 析 融 目 根 至 叶 构造 分 析 树 
时 ， 产 生子 市 点 的 次 序 是 从 左 到 右 。 最 后 括号 内 的 1 从 分 析 带 的 定义 就 能 猜 到 ， 它 代表 每 步 向 前 看 
一 个 符号 。 由 于 仅 有 唯一 的 前 瞻 符 号 ， 分 析 融 将 根据 这 个 符号 选择 与 其 匹配 的 下 一 条 产生 式 规则 。 

要 是 分 析 器 找 不 到 一 条 正好 与 前 瞻 符 号 完全 匹配 的 产生 式 规 则 ,会 怎么 样 呢 ? 这 种 情况 有 可 能 
出 现 , 语法 里 可 能 有 多 条 产生 式 规 则 开头 和 都 是 同一 个 符 吕 。 俩 侦 LLG) 分 析 釉 回 前 看 的 符 写 个 数 仅 为 
一 个 。 要 想 解 决 这 种 同一 前 脆 符 号 匹配 多 条 规则 的 语法 二 义 性 问题 ， 我 们 可 以 改 用 房 1 的 LL(D 分 析 
条 ,也 可 以 通过 对 霹 法 定义 提取 左 因 子 的 方式 ,使 之 满足 LL(UD) RD 分 析 副 的 要 求 ( 详 见 7.6 廊 文献 [1] )。 

目 顶 回 下 分 析 硕 有 时 需要 处 理 左 递 归 的 情况 。 例 如 语法 中 出 现形 如 “A:Aalb” 的 规则 ， 就 
会 令 目 顶 问 下 分 析 需 陷 人 无 限 循 环 。 前 面 提 过 ，RD 分 析 病 通过 一 系列 递归 调用 来 实现 。 产 生 式 
规则 中 的 左 递归 将 使 分 析 顺 永远 递归 下 去 。 语 法 规则 中 的 左 递归 可 以 通过 规则 变换 来 消除 。7.6 
节 文 献 [3] 详 细 介 绍 了 这 方面 的 技术 。 

2. LL(O 违 归 下 降 分 析 器 

LL( 有 分 析 融 与 LL(D) 分 析 融 相似 ， 但 允许 有 更 多 的 前 瞻 符 号 ， 因 此 功能 更 强大 。 它 同样 依 徘 
其 前 脆 集 来 判断 适用 于 输入 符号 的 产生 式 规 则 。 虽 然 更 大 的 前 瞻 集 意味 看 更 复杂 的 分 析 病 结构， 
但 权衡 之 下 ， 比 起 提高 分 析 需 能 力 的 好 处 ， 增 加 一 点 复杂 度 还 是 值得 的 。 

LLIT AR EIJE RE ELLO RLD? 增 大 前 瞻 集 ， 使 LL( 和 分析 融 能 解析 更 多 的 计算 机 语言 。 
但 在 消除 语法 规则 的 二 义 性 方面 ， 它 仍然 只 能 应 付 K 个 符号 以 下 的 情况 。 这 时 可 以 为 LL(O 分 析 需 
增加 另外 一 些 巧妙 的 特性 。 回 湖 即 为 其 中 之 一 , 具备 回溯 能 力 的 分 析 瑜 可 以 识别 具有 任意 前 瞻 集 
的 语言 。7.3.2 市 将 讨论 回溯 分 析 右 。 

ANTLR Hu] /E BE Ab ETE Xs BU BS SS HJ LL(R) A3 AE, 最 适合 在 实际 应 用 中 实现 DSL。 Google App 
Engine, Yahoo Query Language ( YQL ), IntelliJ IDEA 等 许多 大 型 软件 应 用 都 采用 了 ANTLR 来 分 
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析 、 解 释 其 日 定义 语言 。 

掌握 了 分 析 需 的 基本 形式 ,下面 开始 讨论 一 些 比较 高 级 的 目 顶 向 下 分 析 硕 。 这 些 分 析 融 的 使 
用 频 座 可 能 不 高 , 但 还 是 值得 我 们 了 解 其 实现 ,学 习 它 们 为 提高 效率 而 采取 的 技术 和 手段。 何况 第 
8 章 讨 论 通 过 Scala 分 析 带 组 合子 设计 外 部 DSL 时 ， 将 要 用 到 其 中 一 种 技术 。 


7.3.2 ”高 级 的 自 顶 向 下 语法 分 析 器 


高 级 的 语法 分 析 技 术 可 以 赋予 分 析 带 更 强大 的 功能 , 代价 是 增加 实现 上 的 复杂 性 。 不 过 一 般 
我 们 通过 分 析 需 生成 右 、 分 析 融 组 合子 等 抽象 手段 来 间接 实现 分 析 需 ,其 实现 复杂 性 已 经 被 封装 
在 抽象 内 部 。 开 发 者 使 用 的 只 是 抽象 对 外 公开 的 接口 而 已 。 

1. 束 归 下 降 回 溯 分 析 器 

这 种 分 析 右 在 LL(A RD 分 析 姨 的 基础 上 增加 了 回 滴 机 制 , 因此 能 够 处 理 任意 大 小 的 前 瞻 集 。 在 
回溯 机 制 的 帮助 下 ， 分 析 需 可 以 根据 需要 问 前 试探 。 如 果 找 不 到 匹配 项 ， 分 析 需 则 回 滚 其 输入 , 换 
成 别 的 规则 重新 进行 尝试 。 与 LL( 有 分 析 需 相 比 ， 这 种 试探 机 制 使 回溯 分 析 噩 的 分 析 能 力 有 了 极 大 
提升 。 

分 析 需 在 回溯 并 选择 另 一 条 规则 时 ， 有 没有 选择 的 优先 次 序 呢 ? 以 ANTLR 为 例 ， 我 们 可 以 
通过 语法 谓词 (syntactic predicate ) 的 形式 ， 向 分 析 器 提示 规则 的 优先 次 序 〈 见 7.6 节 文献 [2] )。 
分 析 需 根据 我 们 指定 的 顺序 ， 选 择 最 恰当 的 规则 用 于 输入 流 。 

这 类 分 析 融 文 持 一 种 表达 能 力 更 强 的 语法 形式 ， 称 为 PEG (parsing expression grammar， 解 
析 表 达 语 法 )。PEG 对 ANTLR 的 回溯 和 语法 谓词 进行 了 扩展 ， 提 高 了 表现 力 。 它 加 入 了 g&、:! 等 运 
算 符 用 于 文法 规则 的 定义 , 可 对 回 斋 和 分 析 顺 的 行为 进行 更 细致 的 控制 。 文 法 描述 本 喘 读 起 来 也 
好 理解 得 多 。 运 用 中 间 结 有 末 记 忆 (〈memoizing ) 等 技术 ， 我 们 可 以 开发 出 线性 时 间 的 PEG 分 析 协 。 

2. 带 中 间 结 果 记 忆 的 分 析 器 

回溯 RD 分 析 融 在 执行 回 湖 ， 葡 试 其 他 规则 时 ， 和 常常 要 重复 计算 一 些 分 析 结 果 。 榜 记忆 的 分 
析 需 通过 缓存 分 析 的 部 分 中 间 结 果 ， 提 高 了 分 析 的 效率 。 

提高 效率 很 好 ,不 过 加 入 记忆 机 制 , 意味 着 需要 更 多 的 内 存 空间 来 放置 前 面 的 计算 结果 。 传 
统 回溯 分 析 需 实现 的 效率 大 为 提高 ,增加 一 套 机 制 所 带 来 的 麻烦 还 是 值得 的 。 况 且 , 我 们 的 老 朋 
友 ANTLR 文 持 记 忆 功 能 ， 并 不 需要 我 们 亲自 动手 。 

记忆 分 析 紫 需要 占用 更 大 内 存 空 间 的 弱点 ,可 以 通过 一 种 叫做 Packrat 分 矿 谢 的 实现 方案 来 规 
避 。 这 种 分 析 磊 除了 它 奇特 的 名 字 , 更 为 引 人 注 目的 是 其 函数 式 特征 ( 详 见 7.6 节 文献 [6] ) Haskell 
等 图 数 式 语 言 具 备 的 惰性 特性 可 以 很 自然 地 应 用 在 Packrat 分 析 需 的 实现 当中 。8.2.3 节 谈 及 各 种 
Scala 分 析 融 时 ， 会 再 次 详细 探讨 Packrat 分 析 希 。 

3. 语义 谓词 分 析 器 

有 时 ，RD 分 析 需 无 法 仅 赁 语法 本 身 判断 应 该 应 用 的 规则 。 我 们 可 以 在 分 析 需 上 标注 一 些 
Boolean 表 达 式 ， 以 帮助 它 做 出 决定 。 只 有 当 Boolean 表 达 式 求 值 为 真 时 , 候选 规则 才 算 匹配 成 功 。 

语义 谓词 分 析 融 的 典型 用 途 是 , 用 单个 分 析 顺 来 处 理 一 种 语言 的 多 个 版 本 。 分 析 融 的 基干 承 
担 核心 语言 的 识别 工作 ， 而 语言 的 扩展 和 其 他 版 本 ， 则 由 附加 的 语义 谓词 去 解决 。 对 语义 谓词 分 
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自 顶 向 下 分 析 器 非常 简单 ， 类 似 于 7.3.1 节 的 LL(1)。 但 对 于 复杂 的 语言 分 析 ， 我 们 需要 准备 
能 力 与 之 相称 的 分 析 絮 ,例如 本 市 介绍 的 回 漳 分 析 絮 、 记 忆 分 析 禹 、 语 义 谓词 分 析 絮 。 这 些 高 级 
分 析 技 术 适 应 的 语言 结构 范围 更 广 ， 其 实现 的 时 间 复 杂 度 和 空间 复杂 度 有 所 降低 。 下 一 节 将 介绍 
另 一 类 分 析 器 ,它们 可 以 识别 任意 的 确定 性 上 下 文 无 关 语 法 ， 从 这 个 意义 上 说 ,他们 比 上 自 顶 向 下 
分 析 需 适用 性 更 强 。 


7.3.3 ”有 目 底 和 同上 语法 分 析 器 


自 底 癌 上 分 析 器 从 叶子 开始 构造 分 析 树 ,逐步 移 同 根 节 点 。 分 析 需 从 左 向 右 扫 描 输 入 流 , 通 
过 对 文法 规则 的 后 续 规 约 构造 最 右 推导 , 绢 语法 的 起 始 符号 方向 处 理 。 方 向 与 自 顶 问 下 分 析 需 正 
好 相反 。 

自 底 向 上 分 析 器 最 为 常用 的 实现 技法 称 为 移 进 - 归 约 (shift-reduce ) 分 析 。 分 析 器 扫描 输入 
并 遇 到 一 个 符号 时 ， 它 有 两 种 选择 。 

a 将 当前 符号 移 进 到 一 笼 ( 通常 推 入 某 种 符号 栈 ) 供 后 续 归 约 。 

O 匹配 当前 句柄 (handle ) ( 即 输入 串 中 , 与 一 条 产生 式 规则 右 部 相 匹 配 的 子 串 )， 并 以 产生 

式 规 则 左 部 的 非 终结 符号 蔡 换 该 句柄 。 这 个 步骤 一 般 称 为 “ 归 约 ”。 

我 们 将 介绍 两 种 最 为 常用 的 移 进 - 归 约 式 上 自 底 同上 分 析 各 ,一 种 是 算 符 优先 (operator 
precedence ) 分 析 途 , 男 一 种 是 LR 分 析 上 大 。 算 和 从 优先 分 析 俐 功能 有 限 , 但 手工 实现 起 来 极为 简单 。 
相对 来 说 ，LR 分 析 需 在 各 种 生成 融 中 得 到 了 非常 广泛 的 应 用 。 

1. 算 符 优先 分 析 器 

这 种 自 底 回 上 分 析 右 只 能 识别 数量 有 限 的 语言 类 型 , 它 基 于 分 配给 各 终结 符号 的 一 组 静态 优 
先 关 系 规则 。 

算 符 优 先 分 析 避 很 容易 手工 实现 , 但 由 于 它 既 人 处 理 不 了 同一 符号 的 多 重 优先 关系 ， 又 不 不 能 
识别 存在 并 列 的 非 终 结 符 号 的 文法 , 因而 适用 范围 受到 限制 。 例 如 下 面 的 片段 就 不 符合 算 符 优先 
文法 的 要 求 ， 因 为 规则 expr operator expr 中 含有 多 个 相 邻 的 非 终 结 符 号 。 






































expr : expr operator expr 
operator : + || *.|7/ 
Be Poder 24 28 — REL HdSON] 1287 HUIKIS] Eris, 它 能 实现 非常 多 的 语言 类 型 ， 


YACCHIlBison2$ 7i1THJ41 Hr AR E |t DTA IH o 
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是 指 前 瞻 符 号 的 数目 ， 分 析 需 依据 [个 前 瞻 符 号 来 决定 适用 的 产生 式 规 则 。 

LR 分 析 需 由 分 析 表 驱动 。 生 成 需 将 分 析 需 识别 出 输入 符 扣 时 应 该 执行 的 操作 ， 存 储 在 一 张 
分 析 表 中 。 这 里 所 谓 的 操作 其 实 就 是 移 进 或 者 归 约 。 整 个 输入 串 识别 完毕 ,我 们 说 成 分 析 右 “ 归 
约 到 了 文法 的 起 始 符 号 ”。 
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这 种 类 型 的 分 析 器 很 难 手工 实现 ， 但 YACC、Bison 等 生成 器 对 LR 分 析 器 的 支持 十 分 完善 。 

3. LR 分 析 器 的 变 体 

LR 分 析 器 有 三 种 变 体 : 简单 LR (SLR), BiBÉLR (LALR )、 规 范 LR (canonical LR )。SLR 
分 析 需 使 用 简单 的 逻辑 来 判断 前 瞻 集 合 , 分 析 过 程 容 易 产 生 大 量 的 冲突 状态 .LALR 分 析 优 较 SLA 
复杂 ， 对 前 脆 的 处 理 更 周详 ， 冲 突 也 更 少 。 规 范 LR 分 析 需 比 LALR 能 识别 更 多 类 型 的 语言 。 

4. 我 们 真正 会 用 的 方法 

分 析 融 是 外 部 DSEL 的 核心 所 在 。 我 们 需要 基本 了 解 分 析 需 与 被 识别 的 声言 类 型 之 间 的 关系 。 
本 节 介 绍 了 很 多 这 方面 的 专门 知识 ,应 该 能 帮助 选择 正确 类 型 的 分 析 需 去 实现 DSL。 不 过 在 现实 
中 ， 除 非 要 实现 的 语言 实在 太 过 简单 ， 否 则 我 们 绝对 不 会 手工 实现 分 析 器 。 使 用 分 析 器 生成 器 才 
是 正确 选择 。 

使 用 生成 硕 ， 我 们 可 以 在 更 高 级 的 抽象 上 思考 。 定 好 文法 规则 (也 就 是 语言 的 语法 )， 然 后 
生成 需 帮 助 构 建 实 际 的 分 析 需 实现 。 不 过 别 忘 了 , 生成 的 实现 中 只 包含 语言 的 识别 机 制 和 一 棵 人 简 
单 的 AST 树 。 我 们 还 要 进一步 将 AST 转 换 为 语义 模型 ， 才 能 满足 DSL 处 理 的 实际 需求 。 建 立 语义 
檬 型 的 方法 是 在 文法 规则 中 般 入 目 定 义 的 操作 代码 。 

下 一 节 要 在 DSL 开 发 过 程 里 导入 丰 曙 的 工具 文 持 ， 从 而 在 更 高 级 的 抽象 上 使 用 生成 硕 进 行 
DSL 开 发 。 


























7.4 工具 支持 下 的 DSL 开发 一 一 Xtext 


像 ANTLR 这 样 的 语法 分 析 硕 生成 硕 ， 对 于 在 更 高 级 的 抽象 上 开发 外 部 DSL 是 一 大 进步 。 不 
过 我 们 还 是 需要 百 接 在 文法 规则 中 般 入 目标 操作 。EBNF 规 则 没有 与 语义 模型 的 生成 逻辑 充分 分 
离 。 假 如 我 们 希望 为 一 僚 文 法 规则 实现 多 个 语义 模型 , 除了 复制 分 析 右 本 里 的 代码 , 或 者 通过 文 
法 规则 提供 的 共同 抽象 基础 去 小生 不 同 的 语义 模型 ， 恕 旧 没 有 更 好 的 办 法 。 

Xtext 是 一 个 建立 在 Eclipse 平台 基础 上 的 外 部 DSL 开 发 框架 。 它 提供 了 管理 DSL 完 整 生命 周期 
的 全 套 工 具 。Xtext 集 成 了 EMF (Eclipse Modeling Framework )， 并 且 会 以 组 件 形式 管理 DSL 开 发 
过 程 中 产生 的 所 有 内 容 。( 关于 EMF 框 架 的 详情 请 查阅 http://www.eclipse.org/emf。 ) 

使 用 Xtext 时 ， 我 们 首先 编写 好 语言 的 EBNF 文 法 。 人 然后 EMF 根 据 文法 生成 以 下 产物 : 

O 基于 ANTLR 生 成 的 语法 分 析 带 ; 

a 语言 的 元 模型 ， 基 于 EMF 的 Ecore 元 模型 语言 ; 

O 一 个 目 定 义 Eclipse 编 辑 希 ， 市 有 语法 高 觉 、 代 码 提 示 、 代 但 补 全 功能 ， 还 为 我 们 的 模型 

提供 一 个 可 定制 的 大 纲 视 图 。 

图 7-9 展 示 Xtext 对 我 们 定义 的 EBNF 文 法 规则 做 了 哪些 后 续 处 理 。 

Xtext 还 拥有 各 种 可 以 组 合 使 用 的 代码 生成 带 ， 能 生成 满足 多 种 需求 的 语义 模型。 本 方 将 再 
次 实现 7.2.2 节 用 ANTLR 实 现 过 的 交易 指令 处 理 DSL。 这 次 你 会 注意 到 ，Xtext 全 方位 的 工具 支持 
和 它 基 于 模型 的 开发 方式 ， 大 大 方便 了 我 们 管理 DSL 的 演化 。 我 们 的 实现 历程 将 从 语言 的 定义 开 
始 ， 使 用 一 种 基于 EBNF 的 Xtext 文 法 规则 。 
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图 7-9 ”Xtext 处 理 文本 性 质 的 文法 规则 过 后 将 生成 大 量 产 物 。 其 中 Ecore 元 模型 抽象 了 
文法 模型 使 用 的 语法 ， 是 众多 制 成 品 里 的 重 中 之 重 





7.4.1 文法 规则 和 大 纲 视图 
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Xtext 的 DSL 文 法 定义 沿用 EBNF 形 式 ， 另 外 有 一 些 Xtext 的 附加 功能 点 绥 其 间 。 这 里 不 打算 详 
细 介 绍 Xtext 的 文法 规则 定义 ， 这 方面 的 信息 都 可 以 在 Xtext User Guide ( 见 7.6 方 文献 [5] ) 里 面 查 


到 。 代 码 清 单 7.6 用 Xtext 文 法 规则 重新 定义 了 7.2.2 节 的 交易 指令 处 理 DSL。 
代码 清单 7-6 ”Xtext 文 法 规则 


grammar org.xtext.example.Orders 
with org.eclipse.xtext.common.Terminals 


generate orders http://www.xtext.org/example/Orders 


P 生成 元 模型 器 
P 多 值 赋值 
line = Line; 


, 6 单 值 赋值 
Line : 


Model : 
(orders -- Order)*; 


Order : 


9 重用 默认 的 词法 分 析 


buysell = ('buy' | 'sell') security = Security price = Price account = Account; TE 


Security : 
name = ID; 


Price : 
'(d' ( 
(value - INT) 
('limitprice' v 


13 


(value = INT)) 


Account 3 
"ror value = ID; 
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这 段 代 码 与 完 前 的 ANTLR 版 本 大 体 相 似 。 其 中 一 处 不 同 点 表现 在 开头 部 分 ， 即 命令 Xtext 生 
成 语言 元 模型 的 部 分 人 @, 假如 已 经 有 现成 的 Ecore 元 模型 , 也 可 以 让 Xtext 将 它 导 入 当前 工作 环境 ， 
令 模型 与 文法 规则 的 文本 表述 同步 。7.4.2 节 会 进一步 探讨 元 模型 的 内 部 细节 。Xtext 人 允许 将 既 有 
文法 混入 当前 正在 定义 的 规则 人 @@， 以 此 实现 文法 的 重用 ， 这 也 是 一 个 非常 有 趣 的 特点 。 

Xtext 根 据 我 们 的 文法 规则 生成 默认 的 分 析 树 (AST )。AST 生 成 之 后 ， 文 法 里 的 内 联 赋值 成 
为 语法 分 析 需 生成 的 各 AST 元 素 之 间 的 联系 纽带 人 、@。 

除 文本 性 的 文法 规则 之 外 ，Xtext 还 给 出 一 个 大 纲 视 图 来 展现 模型 的 树 形 结构 。 利 用 大 纲 视 
图 ， 可 以 浏览 各 模型 元 系 的 。 图 7-10 显 示 根 据 代码 清单 7-6 定 义 的 文法 产生 的 大 岗 视 图 。 


ož x $l&g'-H 
| 日 E grammar org.xtext.example.Orders 
tå generate orders 
- 号 Model 
"Z orders += Order* 
© Order 
*z line = Line 
Line 
"Z buysell = (..) 
“三 security = Security 
“三 price = Price 
“三 account = Account 
3- Security 
“三 name = ID 
= = Price 
O '@' 


gm 





=>- = Account 
O 'for' 


“三 value = ID 








图 7-10 ”大纲 视 图 展示 模型 的 层级 结构 。 大 纲 视图 展示 每 一 条 规则 对 应 的 结构 。 视 图 内 的 元 
素 可 以 按 字 母 顺序 排列 ， 以 便 碍 找 ， 选 择 其 中 一 个 元 素 将 打开 相应 的 文本 编辑 骨 


图 中 所 见 即 为 模型 的 上 默认 视图 。 这 个 视图 最 值得 称道 的 特点 在 于 ，Xtext 允 许 定制 视图 的 几 
乎 每 一 个 方面 。 我 们 可 以 调整 大 纲 的 结构 ， 可 以 让 用 户 选 择 过 小 部 分 内 容 , 可 以 目 定 义 上 下 文革 
单 等 ， 只 要 覆盖 默认 实现 即 可 。 大 纲 视 图 是 实现 语言 模型 可 视 化 的 其 中 一 件 工具 ,与 文法 的 文本 
表述 结合 起 来 ， 赋 予 DSL 开 发 过 程 更 加 丰富 的 体验 。 
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7.4.2 文法 的 元 模型 


在 文本 编辑 估 里 写 好 文法 规则 以 后 ,让 Xtext 咎 成 语言 制品 , 它 就 会 根据 文法 生成 完整 的 Ecore 
元 模型 ( Ecore 包 含 EMF 的 核心 抽象 定义 )。 我 们 以 文本 形式 定义 的 文法 ， 经 过 元 模型 的 抽象 ， 呈 
现 为 一 种 便于 Xtext 管 理 的 模型 样式 。 元 模型 用 Ecore 元 类 型 ( metatype ) 来 描述 文法 规则 的 各 个 
部 分 。 图 7-11 展 示 了 Xtext 文 法 示例 所 对 应 的 元 模型 。 








&| Orders.ecore 25 [P] GenerateOrders.mwe E GenerateOrders.prope || Orders.xtext Zi EL 
= |=] platform:/resource]org.xtext.example.start/src-gen/org/xtext]example]Orders.ecore 
=- 8 orders 
o- H Model 
&z orders : Order 
日 .日 Order 
H- c» line : Line 
3-H Line 


H- c3 buysell : EString 

* œ security : Security 

(t) œŒ price : Price 

+- =Œ account : Account 
3-H security 

*- C3 name : EString 
3-H Price 

* cC value: EInt 
o- H Account 

-- cC value : EString 





图 7-11 ”交易 指令 处 理 DSL 的 元 模型 。 文 法 中 的 每 条 产生 式 规则 都 返回 一 个 Ecore 
模型 元 素 ， 如 Estring 和 EInt 
注意 ， 在 这 个 元 模型 里 用 了 Estring、EInt 等 元 类 型 来 表示 文法 的 AsT， 它 们 都 是 Ecore 提 
供 的 核心 抽象 。 
除了 元 模型 ， 生 成 器 同时 还 生成 用 来 实例 化 元 模型 的 ANTLR 分 析 需 。 元 模型 控制 Xtext 提 供 
的 全 套 工 具 。 如 需 进一步 了 解 元 模型 的 内 部 细节 ， 请 参考 和 ext User Guide ( 参考 7.6 广 文献 [5] )。 
所 有 必要 的 制品 都 生成 完毕 ， 连 同 生 成 的 IDE 插 件 也 都 安装 好 之 后 ， 就 可 以 在 编辑 器 里 编写 
DSL 脚 本 ， 享 受 语法 高 亮 、 代 码 提 示 、 约 束 检查 等 智能 功能 。Xtext 在 它 的 信息 库 中 建立 了 DSL 
语言 完整 的 EME 模 型 ， 因 而 可 以 在 脚本 的 呈现 方式 上 增加 智能 化 的 手段 。 网 7-12 展 示 了 DSL 示 例 
的 编辑 场景 。 
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三 *my,.order 23 = |m 
buy ibm 8 100 for nomura s 
sell google B limitprice = 200 for chase 


sell ibm 8 120 for bofa 
(3 sell msoft gl 


1 - Va... 
'! x limitprice 
-9 





图 7-12 Xtext 元 模型 提供 了 一 个 专 为 编写 DSL 而 设 的 优秀 编辑 器 。 图 中 代码 补 全 功能 提 
示 有 效 的 输入 候选 内 容 。 从 图 中 还 可 以 看 到 男 一 种 便利 功能 一 一 语法 高 完 功 能 








现在 , 我 们 已 经 将 语言 签 入 了 Xtext 信 息 库 中 。Xtext 为 我 们 提供 操作 DSL 语 法 的 手段 和 界面 ， 
并 且 目 动 更 新 其 Ecore 模 型 。 它 还 给 了 我 们 一 标 默 认 的 AST 树 ， 以 及 生成 这 棵 AST 的 语法 分 析 磊 。 
但 对 于 一 种 实用 的 DSL 来 说 , 这 些 还 不 够 , 我 们 还 需要 一 个 更 加 精细 、 完 善 的 抽象 一 一 博 义 模型 。 
DSL 设 计 者 和 希望 通过 目 定 义 的 代码 开发 来 产生 语义 模型 , 同时 和 希望 这 部 分 代码 能 与 语言 的 核心 模 
型 分 离 。Xtext 的 代码 生成 模板 提供 了 这 样 的 能 力 ， 可 以 交 善 地 将 生成 的 语义 重型 与 文法 规则 集 
成 在 一 起 。 那 么 ， 下 面 就 让 我 们 继续 探索 Xtext 这 方面 的 功能 ， 看 看 它 的 代码 生成 右 要 用 哪些 工 
具 来 为 语义 模型 生成 代码 。 





7.4.8 ”为 语义 模型 生成 代码 


文法 规则 和 元 模型 都 准备 就 红 , 可 以 编写 代码 生成 融 了 。 代码 生成 锅 将 处 理 我 们 到 目前 为 目 
所 建立 的 模型 ， 并 生成 语义 模型 。 有 时 ,我 会 希望 从 一 套 文 法 生成 多 个 语义 模型 。 以 交易 指令 处 
理 DSL 为 例 ， 除 了 生成 一 个 根据 用 户 输 入 创建 交易 指令 对 象 集 合 的 Java 类 ， 我 们 可 能 还 希望 生成 
一 个 JSON ( JavaScript Serialized Object Notation ) 对 象 集 合 ， 用 来 回 数 据 库 传 递交 易 指 令 数据 。 
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理想 状态 下 ， 这 两 个 语义 模型 郡 不 与 核心 的 文法 规则 发 生 厢 合 。 图 7-13 展 示 了 整体 架构 。 









文法 的 Ecore 


指令 处 理 DSL 


的 EBNF 文 法 


ÁN 
L2 


(语义 模型 1) 一 组 Java 对 象 ” (语义 模型 2) 一 组 JSON 对 和 象 
图 7-13 ”语义 模型 应 与 文法 规则 分 离 。 一 套 文法 规则 可 以 对 应 多 个 语义 模型 


那么 ， 我 们 就 用 Xtext 提 供 的 Xpand 模 板 来 生成 Java 代 码 。 

1. 用 Xpand 模 板 生成 代码 

Xpand 模 板 遍 历 由 文法 规则 形成 的 AST， 然 后 生成 代码 。 模 板 需 要 的 第 一 个 输入 是 元 模型 ， 
我 们 通过 <IMPORT orders» 提 供给 它 。 下 面 是 充当 入 口 的 主 模 板 ， 它 负 员 派发 到 其 他 子 模板 : 


«IMPORT orders» 
«DEFINE main FOR Model» 

«EXPAND Orders::orders FOR this» 
«ENDDEFINE» 


在 这 上 段 代 人 码 中 ，orders 是 需要 导入 的 元 模型 名 称 。 每 个 模板 都 有 一 个 名 称 和 一 个 决定 模板 
调用 时 机 的 元 类 型 。 本 例 中 模板 的 名 称 是 main， 元 类 型 是 Model ( Model 是 我 们 在 文法 规则 中 定 
义 的 一 个 文法 元 素 ，Xtext 将 它 表 示 为 Ecore 元 模型 中 的 一 个 元 类 型 )。 这 个 main 模 板 非 浓 简单 ， 
它 的 功能 仪 仪 是 在 识别 到 Model 符 写 上 时， 派发 到 orders::orders 子 模板 。 代 人 码 清单 7-7 是 
Orders: :orders 模 板 的 定义 。 


代码 清单 7-7 ”生成 orders 语 义 模 型 的 模版 


«IMPORT orders» - 
€ 导入 元 模型 7 
«DEFINE orders FOR Model» 











«FILE "OrderProcessor.java"» <4 生成 Java 文 件 
import java.util.*; m" 

Y 米 

import org.xtext.example.ClientOrder; 4 自 定 义 Java 类 


public class OrderProcessor { 
! ! ! : | | 待 生 成 的 类 
private List«ClientOrder» cos = new ArrayList«ClientOrder»(); |f R 
public List«ClientOrder» getOrders() { 


«EXPAND order FOREACH this.orders» 
return Collections.unmodifiableList (cos); Mu 将 被 替换 的 模板 
} 
} 
«ENDFILE» 


«ENDDEFINE» 
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«DEFINE order FOR Order» 
cos.add(new ClientOrder("«this.line.buysell»", 
"«this.line.security.name»", 
«this.line.price.value», 
"«this.line.account.value»")); 
«ENDDEFINE» 


当 文法 和 被 归 约 到 起 始 符号 〈 即 Model )， 语 言 识 别 结束 时 ， 代 码 清单 7-7 中 定义 的 代码 也 在 模 
板 推动 下 生成 出 来 。 表 7-4 就 代码 生成 模板 的 一 部 分 特性 给 出 了 详细 解释 。 


表 7-4 Xtext 的 代码 生成 模版 





特 性 解 KR 
可 以 生成 任意 的 代码 。 例 ”这 个 类 只 对 外 提供 一 个 方法 ， 返 回 从 DSL 脚 本 解析 所 得 的 全 部 交易 指令 的 集合 。 集 合 的 
中 生成 了 一 个 Java 类 元 素 是 单独 定义 的 POJO 对 象 (clientorder ) ， 与 文法 无 关 





在 orders 模 板 内 运用 了 对 ”我 们 可 以 在 产生 式 规 则 内 访问 文法 模型 的 元 系 ， 并 使 用 模板 蔡 换 这 些 内 联 元 系 的 文本 。 
order 模 板 的 内 联展 开 例如 <this.line.price.value> 就 是 一 个 占 位 标记 , 会 在 DSL 脚 本 完成 分 析 后 , 被 实际 
的 单价 殖 换 挥 








模板 一 切 就 绪 ， 我 们 通过 项 目的 上 下 文 菜单 再 次 运行 Xtext 的 生成 需 。 
2. 执行 DSL 脚 本 
假设 我 们 要 执行 下 列 DSL 脚 本 : 


buy ibm @ 100 for nomura 
sell google @ limitprice = 200 for chase 


这 上 段 脚 本 经 过 Xtext 的 处 理 ， 最 终生 成 代码 清单 7-8 所 示 的 OrderProcessor.java 文 件 。 


代码 清单 7-8 由 代码 清单 7-7 的 模版 生成 的 类 
import java.util.*; 
import org.xtext.example.ClientOrder; 
public class OrderProcessor í( 
private List«ClientOrder» cos = new ArrayList«ClientOrder-»(); 





public List«ClientOrder» getOrders() { 
cos.add(new ClientOrder("buy", "ibm", 100, "nomura")) 
cos.add(new ClientOrder("sell", "google", 200, "chase")) 
return Collections.unmodifiableList(cos); 
j 
} 


按照 Xtext 的 做 法 ,定义 文法 规则 和 构建 语义 模型 这 两 个 方面 可 以 充分 分 离 。 文 法 规则 的 定 
义 由 智能 文本 编辑 毅 负 责 , 用 可 定制 的 大 纲 视图 作为 补充 。 语义 模型 的 实现 则 在 各 种 代码 生成 述 
的 控制 之 下 ， 通 过 元 模型 与 语法 分 析 带 联系 在 一 起 。 

最 后 谈 谈 开发 外 部 DSL 时 ， 像 Xtext 这 样 文本 与 可 视 化 环境 相 混合 的 方式 有 哪些 优 缺点 。 

3. RAMA CUL ER SE ERR 

Xtext 提 出 了 一 种 创新 的 外 部 DSL 开 发 方式 ， 以 其 丰富 的 工具 ， 增 强 了 DSL 传 统 的 文本 表示 。 
我 们 仍然 需要 编写 EBNF 格 式 的 文法 规则 ,但 在 后 侣 ，Xtext 不 但 为 我 们 生成 ANTLR 语 法 分 析 带 ， 
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更 将 我 们 的 文法 规则 抽象 为 一 个 元 模型 。 Xtext 的 全 套 工具 都 置 于 一 个 围绕 元 模型 建立 起 来 的 架 
构 内 。 基 于 Xtext 的 开发 方式 除了 增强 DSL 编 辑 能 力 ， 用 它 的 Xpand 模 板 机 制 来 生成 目 定 义 代码 ， 
还 能 有 效 地 分 离 博 义 模型 和 文法 规则 。 

总 而 言 之 ， 在 EMF 框 架 文 持 下 ，Xtext 提 供 了 优异 的 外 部 DSL 开 发 体验 。 只 有 一 点 需要 小 心 ， 
即 Xtext 寺 Eclipse 平台 的 依赖 。 不 过 也 只 有 IDE 集 成 开发 环境 依赖 Eclipse， 语 法 分 析 融 、 元 模型 、 
序列 化 组 件 、 链 接 组 件 、Xpand 模 板 等 运行 时 组 件 ， 都 可 以 在 任意 的 Java 进 程 中 使 用 。Xtext 的 种 
种 优点 使 其 成 为 我 们 开发 外 部 DSL 的 首选 框架 。 




















7.5 MZ 


本 章 学 习 了 外 部 DSL 的 设计 原则 。 外 部 DSL 需 要 建立 自己 的 一 套 语言 处 理 设 施 。 假 如 我 们 的 
DSL 复 杂 度 特别 低 ， 那 么 可 以 手工 编写 语法 分 析 需 。 复 杂 一 些 的 DSL 则 需要 用 到 功能 完备 的 语法 
分 析 需 生成 需 ， 如 YACC、Bison、ANTLR 等 。 我 们 详细 讨论 了 基于 ANTLR 的 语言 构建 ， 用 它 开 
发 了 一 种 自 定义 交易 指令 处 理 DSL。 其 间 考 察 了 ANTLR 实 现 引擎 中 的 各 组 成 部 件 ， 如 词法 分 析 
作 、 语 法 分 析 厦 、 语 义 模型 等 ， 如 何 协 作 形 成 最 终 的 DSL 人 处理 程序 。 








要 点 与 最 佳 实践 

口 设 计 DSL 时 ， 应 该 明确 分 离 语法 和 背后 的 语义 模型 。 

O 外 部 DSL 的 语义 模型 可 以 用 宿主 语言 的 语言 结构 来 实现 ,语法 分 析 需 要 一 种 能 与 宿主 语 
言 集成 的 分 析 器 生成 器 。ANTLR 是 一 款 典 型 的 分 析 器 生成 器 ， 它 能 和 Java 语 言 完 美 地 集 
成 在 一 起 。 

口 选择 合适 的 分 析 器 类 型 。 只 要 语言 不 是 太 过 简单 ， 都 应 该 在 开始 外 部 DSL 设 计 之 前 ， 就 
按照 对 语言 处 理 能 力 的 需求 做 好 决策 。 正 确 的 分 析 器 类 型 有 利于 降低 实现 的 复杂 度 。 

口 按 实 际 需 要 来 决定 复杂 度 水 平 。 外 部 DSL 不 必 设 计 得 像 通 用 语言 一 样 复杂 。 





对 于 具备 一 定 复杂 度 ， 语法 比较 丰富 的 外 部 DSL 来 说 , 语法 分 析 器 是 语言 设计 的 核心 。 语 法 
分 析 器 按照 其 扫描 输入 流 和 构造 分 析 树 的 方式 来 分 类 。 主 要 有 两 大 类 型 : 自 顶 向 下 分 析 器 和 自 底 
向 上 分 析 器 。 语言 设计 者 需要 知道 每 一 类 语法 分 析 器 适合 处 理 的 语言 种 类 , 还 需要 知道 每 一 种 分 
析 器 实现 的 复杂 度 和 选择 依据 ,本章 一 边 介绍 语法 分 析 器 的 分 类 , 一边 深入 讨论 了 这 方面 的 内 容 。 
完成 交易 指令 处 理 DSL 的 设计 , 说 明 我 们 已 经 懂得 为 语言 选择 正确 的 分 析 器 类 型 。 本 音 最 后 
一 节 转 向 另 一 种 DSL 开 发 范式 , 在 熟识 的 标准 文本 模型 基础 上 , 引入 一 套 丰富 的 工具 .立足 Eclipse 
平台 , 青 结合 EME 框 架 的 模型 驱动 开发 方式 ， 令 Xtext 成 为 集 优点 于 一 身 的 外 部 DSL 开 发 环境 。 用 
xtext 重 新 实现 与 前 面 的 例子 相同 的 交易 指令 处 理 DSL, 开 发 过 程 体现 了 模型 驱动 方式 的 多 样 性 结 
合 一 整套 工具 ， 可 以 获得 更 加 丰富 的 语言 开发 体验 。 
下 一 章 将 介绍 使 用 Scala 语 言 的 一 种 截然 不 同 的 外 部 DSL 开 发 范式 。Scala 提 供 的 一 类 函数 式 
组 合子 可 以 作为 开发 语言 分 析 功 能 的 建造 材料 。 它 们 称 为 分 析 器 组 合子 (parser combinator ) dX 
们 将 用 这 些 组 合子 来 实现 证 券 交 易 领域 的 外 部 DSL 示 例 。 
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用 Scala 语 法 分 析 器 组 合子 
设计 外 部 DSL 


本 章 内 容 

口 什么 是 分 析 融 组 合子 

O Scala 的 分 析 融 组 合子 库 

口 Packrat 分 析 硕 的 用 法 

口 用 Scala 提 供 的 各 种 分 析 需 组 合子 来 设计 外 部 DSL 





审 厦 我 们 从 第 7 草 学 到 的 关于 外 部 DSL 实 现 的 基础 知识 ， 本 草 把 话题 直接 转 到 分 析 需 组 合子 
( parser combinator )。 分 析 需 组 合子 是 图 数 式 编 程 最 为 精彩 的 应 用 之 一 。 这 些 组 合子 构成 了 一 种 
用 来 设计 外 部 DSEL 的 内 部 DSL， 也 就 是 说 ， 可 以 不 必 像 别 的 外 部 DSL 实 现 技术 那样 ， 要 求 我 们 目 
行 建立 一 套 语言 处 理 设施 。 以 第 7 草 处 理 客户 交易 指令 的 外 部 DSL 为 例 ， 我 们 在 设计 的 时 候 用 到 
了 ANTLR 语 法 分 析 带 生成 带 。 设 计 好 的 DSL 语 法 要 通过 ANTLR 来 生成 语法 分 析 各 。 换 言 之, 我 
们 的 DSL 需 要 依赖 外 部 工具 来 提供 必要 的 语言 实现 基础 设施 。 而 当 我 们 使 用 分 析 屁 组 合子 的 时 
修 ， 完 全 不 需要 越 出 答 主 语言 半 步 。 实 现 因 此 变 得 简洁 、 有 表现 力 ， 而 且 完 全 摆脱 了 一 切 外 部 
依赖 。 

我 们 先 从 什么 是 分 析 融 组 合子 说 起 ， 再 谈 到 Scala 在 其 核心 语言 基础 上 实现 的 分 析 需 组 合子 
库 。 随 后 进一步 详尽 地 说 明 Scala 组 合子 库 的 各 种 细节 , 重点 突出 那些 令 其 成 为 DSL 设 计 标 杆 的 特 
性 。 在 这 之 后 ， 我 们 将 运用 Scala 的 分 析 震 组 合子 来 设计 两 个 外 部 DSL。 最 后 介绍 packrat 分 析 俘 ， 
这 种 分 析 需 能 实现 普通 递归 下 降 分 析 需 无 法 实现 的 文法 类 型 。 图 8-1 是 本 章 的 路 线 图 ， 我 们 就 昭 
着 图 上 的 指引 ， 循序 渐进 地 探索 用 Scala 的 分 析 紫 组 合子 来 设计 DSL 的 世界 。 

学 习 完 本 章 内 容 , 你 将 牢固 地 掌握 如 何 使 用 函数 式 编程 技术 , 特别 是 分 析 需 组 合子 技术 来 实 
现 可 扩展 的 外 部 DSL。 




















分 析 强 组 合子 简介 

。 什么 是 分 析 器 组 合 于 

。 用 分 析 费 组 合子 制作 一 个 使 用 分 析 器 组 合 
子 的 DSL 实 现 示例 





一 个 入 | 基 ae 
Scala 的 分 析 器 组 合子 库 


e. 库 中 的 组 合子 
e Monad 化 的 组 合 
e Packrat4) rz 


图 8-1 KERRE 


8.1 分 析 器 组 合子 


在 第 7 章 的 时 候 ， 我 们 把 语法 分 析 带 定义 成 一 个 作用 于 输入 流 ， 并 将 词法 单元 集合 的 引擎 。 它 
能 在 符号 流 中 识别 分 析 峰 认可 的 有 效 语言 成 分 , 或 者 在 遇 到 无 效 得 号 的 时 候 立 即 中 止 当 前 输入 。 无 
论 哪 种 情况 ， 分 析 融 都 返回 一 个 《或 成 功 或 失败 的 ) 结 采 ， 同 时 返回 尚未 处 理 的 剩余 输入 流 。 

如 果 分 析 融 返回 成 功 的 结 末 , 我 们 可 以 将 剩余 输入 流 送 入 为 一 个 分 析 带 继续 处 理 。 如 来 返回 
失败 结 采 , 我们 可 以 回 退 到 输入 流 的 开关 位置, 竹 试 用 为 一 个 分 析 卓 来 处 理 它 。 鉴 于 分 析 右 目 刁 
的 工作 模式 ， 可 以 将 多 个 分 析 右 授 不 同方 式 串 联 起 来 ， 实 现 对 输入 流 的 完整 分 机 。 图 8-2 描 绘 了 
将 多 个 分 析 带 组 合 起 来 ， 共 同 处 理 输入 流 的 情形 。 

词法 单元 输入 流 




















Iesse [ 7L enr 
后 两 部 分 的 新 分 析 絮 
seq[ParseResultl, ParseResult2] 
图 8-2 ”串联 起 来 的 分 析 带 。 分 析 带 1 处 理 一 部 分 输入 流 , 分 析 带 2 处 理 分 析 带 1 余下 的 部 分 。 这 两 
个 分 析 各 组 合 而 成 的 分 析 副 , 其 返回 结果 也 是 原来 两 个 返回 结果 的 组 合 。 FUR 24A TS 
和 分 析 右 2 都 成 功 匹配 其 输入 时 ,组合 后 的 分 析 各 才 返回 成 功 结 
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本 市 将 建立 一 种 分 析 各 的 使 用 思路 ， 即 分 析 带 是 对 它 所 识别 的 语言 的 一 种 孙 数 式 抽象 。 由 于 
分 析 益 是 其 输入 的 函数 ， 所 以 可 以 一 个 一 个 地 组 合成 别 的 分 析 带 ,而 且 每 次 组 合 部 是 DSL 语 法 的 
一 次 扩 增 。 对 于 能 完成 这 样 的 组 合 的 蜗 阶 函数 ， 我 们 赋予 它 一 个 正式 的 名 称 : 分 析 货 组 合子 。 


8.1.1 什么 是 分 析 器 组 合子 


我 们 以 函数 式 的 思路 来 考虑 分 析 避 的 组 合 问题 。 在 陶 数 式 编程 中 , 分 析 右 是 一 个 接受 输入 并 
产生 结果 的 函数 。 分 析 器 组 合子 允许 我 们 单纯 以 组 合 的 方式 ， 将 高 阶 函 数 (又 叫做 组 合子 ) 搭建 
成 各 式 文法 结构 ， 如 顺序 、 重 复 、 可 选项 、 分 文选 择 等 。 如 果 和 宿主 语言 文 持 中 绥 运 算 符 写法 , JD 
么 用 分 析 需 组 合子 写 出 来 的 文法 规则 ， 看 起 来 就 像 EBNEF 产 生 式 的 样子 。 

用 组 合子 来 分 析 语 法 , 最 大 的 好 人 处 在 于 能 够 提高 组 合 性 ; 少数 基本 的 分 析 避 经 过 函数 式 的 组 合 ， 
即 可 构成 更 大 更 复杂 的 分 析 絮 ( 本 书 附录 A 阐述 了 组 合 性 特质 的 优点 )。 组 合子 的 编排 就 像 搭 积木 ， 
我 们 从 小 块 的 材料 开始 ， 逐 渐 搭 出 高 阶 的 结构 。 图 8-2 就 是 一 个 顺序 组 合子 在 履行 它 的 搭建 工作 。 

把 次 积木 的 思路 推广 到 DSL 设 计 上 ,我 们 先 用 分 析 需 组 合子 组 合 出 一 些小 的 声言 族 段 ， 作 为 
对 DSL 语 法 局 部 的 建 模 , 再 由 这 些 片段 拼 出 完整 的 DSL 结 构 。 图 8-2 的 顺序 组 合子 只 是 众多 组 合子 
中 的 一 种 ,图 上 它 正在 将 两 个 DSL 语 法 分 析 需 顺序 地 连接 起 来 。 任 何 组 合子 库 都 会 包含 各 式 各 样 
的 组 合子 ,就 像 一 套 积 木 里 有 不 同 的 形状 。 我 们 从 几 个 和 常用 的 组 合子 说 起 , 看 它们 怎样 处 理 输入 
流 和 识别 语言 文法 ， 详 见 表 8-1。 






































表 8-1 常用 的 分 析 器 组 合子 








组 合子 组 合 方 式 
顺序 用 于 构造 顺序 结构 的 分 析 带 组 合 于 。 奉 分 析 融 P 和 Q 以 顺序 组 合子 相连 接 ， 则 当 出 现 以 下 情况 时 ， 认 
为 分 析 是 成 功 的 


四 了 成 功 处 理 一 部 分 输入 流 
m Q 跟 在 P 之 后 处 理 P 未 处 理 的 剩余 输入 

替代 用 于 构造 蔡 代 结构 的 分 析 需 组 合子 。 知 分 析 顺 P 和 Q 以 替代 组 合子 相连 接 , 则 当 P 或 Q 其 中 之 一 在 以 下 
情况 下 成 功 时 ， 认 为 分 析 是 成 功 的 
是 了 先 处 理 输入 流 。 若 了 成功 ， 则 分 析 是 成 功 的 
e 若 P 失 败 ， 则 输入 流 回 退 到 P 开 始 处 理 之 前 的 位 置 ， 换 由 Q 来 处 理 同 一 输入 流 
e 若 Q 成 功 ， 则 分 析 是 成 功 的 ; 否则 分 析 失 败 

函数 施用 这 个 组 合子 在 分 析 圳 上 应 用 一 个 图 数 ， 结 果 产 生 一 个 新 的 分 析 需 

重复 当 重 复 组 合子 作用 于 分 析 融 P 时 , 返回 男 一 个 分 析 姨 ,其 分 析 对 象 是 P 的 分 析 对 象 的 一 次 或 多 次 重复 。 
Wee. 重复 组 合子 还 允许 重复 模式 与 分 隔 符 交错 的 情况 
例如 , P 可 分 析 字 符 串 apc, 对 P 应 用 重复 组 合子 后 产生 的 分 析 需 , 将 能 够 分 析 abc 的 重复 abcacabc…， 
或 者 允许 模式 abc 与 空格 交错 出 现 ， 即 abc abc abc… 























仅仅 知 拓 这儿 个 基本 的 组 合子 ， 还 不 够 用 于 讨论 DSL 的 具体 实现 。 我 们 要 先 学 习 怎 样 用 分 析 
售 组 合子 来 设计 外 部 DSL。 
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8.1.2 ”按照 分 析 器 组 合子 的 方式 设计 DSL 


第 7 章 我 们 在 设计 外 部 DSL 时 ， 目 行 建 立 了 一 套 语 言 处 理 设施 。 由 于 手工 实现 分 析 融 工作 量 
巨大 又 容易 出 错 , 代码 还 稼 稼 膛 胀 到 失控 的 地 步 , 所 以 我 们 决定 借助 ANTLR 和 Xtext 等 外 部 框架 。 
在 外 部 框架 的 参与 下 ， 会 形成 如 图 8-3 所 示 的 实现 染 构 。 


y" 外 部 框架 
EBNF 规 则 一 一 | 分 析 器 生成 器 定制 动作 


(定义 DSL 的 语法 ) 


DSL 脚 本 


分 析 并 生成 
一 棵 分 析 树 


语义 模型 


与 核心 应 用 集成 
图 8-3 ”使 用 ANTLR 等 外 部 分 析 带 生成 表 来 设计 外 部 DSL 的 实现 架构 。 生 成 融 产 生 分 
析 船 ， 分 析 希 分 析 DSL 脚 本 并 生成 应 用 的 语义 模型 


图 上 的 架构 并 不 是 一 个 坏 的 染 构 , 相反 , 它 是 当前 使 用 最 为 普 志 的 外 部 DSL 设 计 范 式 。 目 
从 LEX、YACC 那 一 代 语 言 处 理工 具 走 出 AT&T 实 验 室 以 来 ， 开 发 者 们 一 直 在 沿用 相同 的 架构 
风格 。 

虽然 这 个 染 构 久 经 考验 , 但 并 不 意味 着 我 们 不 能 通过 探 寺 找 到 更 新 更 好 的 DSL 实 现 方式 。 图 
8-3 的 染 构 有 一 个 明显 的 缺点 ， 就 是 这 样 实现 出 来 的 DSL 有 具有 外 部 依赖 。 分 析 上 生 成 瘟 作 为 一 个 
外 部 实体 ( 如 图 中 所 见 ), 我 们 需要 用 它 不 同 于 箱 主 语言 的 语法 来 定义 DSL 的 EBNF 规 则 ( 请 回忆 
一 下 第 7 董 的 EBNF 知 识 ), 这 网 使 得 学 习 曲 线 更 为 陡峭 。 生 成 融 生 成 的 分 析 末 代 码 结构 是 静态 的 ， 
完全 依赖 于 后 成 希 内 部 的 实现 ， 用 户 没 有 多 少 调整 定制 的 余地 。 

用 分 析 带 组 合子 来 设计 DSL 是 一 种 完全 不 同 的 体验 。 我 们 可 以 沉浸 在 箱 主 语言 的 抽象 氛围 里 
定义 文法 规则 ， 用 高 阶 函 数 定义 DSL 的 语法 ,用 库 里 预备 的 组 合子 添加 定制 动作 。 具 体 的 细 市 我 
们 会 在 后 续 章 节 内 详细 解说 。 从 岁 8-4 可 以 笑 见 特 主 语言 内 生 的 分 析 融 组 合子 对 简化 实现 恕 构 的 
成 效 。 
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外 来 语法 
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用 宿主 语言 来 定义 
EBNF 规 则 定制 动作 
(定义 DSE 的 语法 ) 


fü E EH 
DSL 脚 本 基础 设施 





语义 模型 


与 核心 应 用 程序 集成 


图 8-4 ”使 用 分 析 器 组 合子 来 设计 外 部 DSL 的 实现 架构 。 定 义 文法 规则 和 定制 动作 时 ， 
完全 不 需要 越 出 牡 主语 言 的 设施 范围 之 外 


在 新 的 架构 下 ，DSL 不 存在 对 外 部 框 染 的 依赖 。 仅 有 的 先决 条 件 ， 是 答 主 语言 必须 提供 一 套 
分 析 需 组 合子 库 。 相 对 而 言 ,分析 器 组 合子 是 DSL 实 现 领 域 的 新 成 员 。 不 少 现代 语言 ， 如 Haskell、 
Scala 和 Newspeak 邵 在 其 核心 语言 上 ， 以 库 的 形式 提供 分 析 右 组 合子 功能 。 你 将 在 本 章 的 学 习 过 
程 中 发 现 , 分 析 咒 组 合子 缠 含 了 对 函数 式 编 程 思 维 精 彩 而 新 闫 的 运用 。 我 们 要 揭 开 它 是 怎么 做 到 
设计 DSL 时 简洁 而 不 失 表 现 力 的 。 











定义 ”Newspeak 有 是 由 Gilad Brachai?T $4 — $175 Æ SelffeSmalltalki& È 42587284238 & , X T iX 
种 语言 的 详情 请 参阅 http://newspeaklanguage.org 





下 一 市 , 我 们 将 认识 Scala 的 分 析 带 组 合子 库 , 这 个 库 以 纯 也 数 式 的 方式 提供 强大 的 外 部 DSL 
设计 能 力 。 我们 定义 的 每 一 个 分 析 器 都 是 对 DSL 语 法 的 一 个 小 成 分 的 建 模 , 组 合子 像 胶 水 一 样 把 
所 有 的 成 分 连接 起 来 ， 赋 也 它们 语义 。 


8.2 Scala 的 分 析 器 组 合子 库 
Scala 在 其 核心 语言 之 上 实现 了 分 析 磊 组 合子 库 。 这 个 库 随 Scala 语 言 一 起 发 布 ， 包 的 位 置 在 


scala.util.parsing。 以 库 的 形式 实现 分 析 大 组 合子 ， 便 于 在 不 影响 核心 语言 的 前 提 下 进行 
扩展 。 本 闻 将 通过 各 种 DSL 片 段 来 学 习 Scala 库 的 使 用 技巧 和 惯用 法 。APT 方 面 的 细节 可 以 参考 8.6 
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节 文 献 [1] 和 文献 [2], 或 者 直接 查阅 Scala 的 源 代码 。( 不 幸 的 是 , 目前 还 没有 详细 介绍 Scala 分 析 器 
组 合子 的 出 版 物 ， 源 代码 是 眼下 最 好 的 参考 资料 。) 
8.2.1 分 析 器 组 合子 库 中 的 基本 抽象 


通过 上 一 节 的 讨论 , 我 们 知道 分 析 带 是 一 个 将 输入 流 变 换 为 分 析 结 果 的 函数 。Scala 库 根据 这 
个 概念 建立 了 如 图 8-5 所 示 的 模型 。 











一 个 输入 为 Input 、 输 出 为 泛 型 
数据 类 型 ParseResult [T] 的 国 数 

















| 
abstract class Parser[-*T] extends (Input => ParseResult[T]) 
| | 
分 析 器 抽象 Parsers trait 内 部 
含有 通用 的 输入 读 取 器 
trait Parsers { 
type Elem 
type Input = Reader[Elem] 
ARF 


} 
K|8-5  ScalaFEJ4 4 Pra EE N — A RR 


ParseResult 是 对 分 析 融 产生 的 结果 的 抽象 ， 结 果 可 以 是 成 功 也 可 以 是 失败 。 此 外 
ParseResul tR A 尚未 被 当前 分 析 需 处 理 的 下 一 输入 。 Scala 库 建 模 的 ParseResul t 是 一 个 
泛 型 抽象 类 ，Ssuccess 和 Failure 是 它 的 两 个 特 化 实现 。 下 面 的 代码 清单 给 出 了 Scala 对 
ParseResult(T] 类 型 的 定义 以 及 该 类 型 的 特 化 实现 success 和 Failure。 











代码 清单 8-1 ”Scala 对 分 析 结 果 的 建 模 
trait Parsers { 
sealed abstract class ParseResult[-«T] { 
//.. 


val next: Input 


} 


case class Success[+T] (result: T, override val next: Input) 


E ParseResult 跟 踪 着 下 一 输入 


extends ParseResult[T] { 
//.. implementation e 分 析 成 功 
} 
sealed abstract class NoSuccess( 
val msg: String, override val next: Input) Ns 针对 分 析 不 成 功 情 况 的 基 类 
extends ParseResult[Nothing] { 
Ju as 


} 


case class Failure( 
override val msg: String, override val next: Input) 
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extends NoSuccess(msg, next) { 
[fee 0 失败 => 回溯 并 重 试 
} 
case class Error( 
override val msg: String, override val next: Input) 
extends NoSuccess(msg, next) { 
I es 6 不 可 恢复 的 错误 ， 
} 不 回溯 
Z4 2s 
j 


ParseResult 对 分 析 需 产生 的 结果 的 数据 类 型 做 了 泛 型 化 处 理 。 当 结果 为 success 9, 
我 们 得 到 类 型 为 z 的 结果 。 当 结果 为 Failure 9I, 我 们 得 到 一 条 失败 消息 。Failure 分 为 可 恢 
复 错误 (nonfatal ) 和 不 可 恢复 错误 ( fatal )。 对 于 可 恢复 的 Failure 个 ,我们 可 以 回溯 并 尝试 其 
他 备 选 的 分 析 右 。 对 于 不 可 恢复 的 Error ©, FEIE, MEIE PEREP 
情况 (Success 或 Failure )， 结 果 都 会 说 明 当 前 分 析 过 程 处 理 了 多 少 输入 ， 4 rds BEZRTPHJ P 
一 个 分 析 需 应 该 从 输入 流 的 哪个 位 置 开 始 接手 @。 

本 章 后 续 的 外 部 DSL 例 子 会 继续 演示 奉 代 和 回溯 的 具体 做 法 。 如 何 处 理 分 析 中 出 现 的 不 成 功 
的 情况 ， 这 是 我 们 设计 DSL 时 必须 仔细 考虑 的 一 个 要 点 。 例 如 有 时 候 奉 代 安 排 得 太 多 ， 可 能 导致 
性 能 衰退 ， 而 且 有 时 候 客观 条 件 不 允许 我 们 设计 上 齐 回 漳 的 分 析 顺 。 


你 想 知道 分 析 器 组 合子 库 里 的 这 些 类 都 在 DSL 实 现 中 扮演 什么 角色 吗 ? 

我 们 建 模 时 每 一 段 DSL 都 要 有 一 个 配套 的 分 析 器 ， 由 它 负责 检查 语法 的 有 效 性 。 
有 当 用 户 提供 的 脚本 语法 正确 时 ，DSL 处 理 过 程 才 会 继续 下 去 。 如 果 语 法 是 有 效 的 ， 
析 器 返回 Success; 否则 返回 Error 或 Failure。 对 于 Failure 的 情况 , 分析 器 可 以 
进行 回溯 ， 尝 试用 别 的 替代 规则 来 分 析 。 


现在 我 们 知道 了 分 析 天 和 ParseResult 的 各 种 实现 ， 但 那么 多 分 析 表 是 怎么 串联 在 一 起 ， 
完成 整个 DSL 的 分 析 工 作 的 呢 ? 这 正 是 组 合子 的 作用 。 所 以 ， 接 下 来 我 们 要 介绍 Scala 提 供 的 一 
些 组 合 于 ， 学 习 怎 样 局 效率 地 利用 这 些 组 合子 把 我 们 设计 的 分 析 带 一 个 个 连接 起 来 。 


8.2.2 ”把 分 析 器 连接 起 来 的 组 合子 


Scala 分 析 融 组 合子 库 含 有 一 整套 用 来 连接 各 种 分 析 融 的 组 合子 。 我 们 在 第 7 草 用 ANTLR 和 
Xtext 来 设计 外 部 DSEL 的 时 候 ， 利 用 分 析 需 生成 融 技 术 同 样 可 以 写 出 近似 EBNF 形 式 的 文法 。 组 
合子 技术 与 之 相 比 , 不 需要 借助 宿主 语言 以 外 的 任何 外 部 环境 。 我 们 在 Scala 语 言 范围 内 ， 利 用 
其 高 阶 函 数 特性 即 可 定义 出 类 似 EBNF 的 文法 。 假 如 把 DSL 语 法 看 作 是 众多 小 片段 的 集合 ， 那 
么 组 合子 的 作用 就 是 把 每 个 片段 对 应 的 分 析 需 拼接 到 一 起 ， 构 成 一 个 大 的 、 针 对 DSL 整 体 的 分 
DIETS 

学 习 Scala 组 合子 的 最 佳 方式 自然 是 通过 真实 的 例子 。 我 们 继续 沿用 前 面 章节 用 过 的 领域 示 
例 , 设计 一 种 外 部 DSL 来 处 理 用 户 通 过 一 系列 输入 提供 的 客户 交易 指令 。 我 们 需要 生成 的 抽象 如 
图 8-6 所 示 。 














sí 

ZN 
~ 

分 
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图 8-6 ”以 各 种 输入 项 目 作 为 属性 来 生成 交易 指令 

大 致 掌握 分 析 需 组 合子 的 能 力 之 后 , 我 们 现在 多 了 一 种 可 行 的 选择 。 排 除了 通过 外 部 分 析 唱 
生成 硕 ( 如 ANTLR ) 的 实现 方式 ， 我 们 还 可 以 考虑 用 Scala 提 供 的 组 合子 把 一 系列 较 小 的 分 析 带 
连接 起 来 ， 实 现 对 DSL 的 语法 分 析 。 

分 析 链 条 中 的 每 一 个 小 分 析 需 只 负责 分 析 一 小 块 固定 的 DSL 结 构 ， 然 后 在 组 合子 的 协调 下 ， 
将 输入 流转 交 给 下 一 个 分 析 硕 。 经 过 与 客户 的 反复 商讨 和 迭代 开发 ,我 们 确定 了 客户 币 望 的 霹 法 ， 
最 后 得 到 下 面 代 码 清单 中 的 文法 定义 。 这 段 代码 使 用 了 我 们 刚刚 介绍 过 的 Scala 分 析 需 组 合子 来 表 
达 DSL 语 法 。 


代码 清单 8-2 ”用 Scala 分 析 磊 组 合子 设计 外 部 DSL 的 示例 


package trading.dsl 
import scala.util.parsing.combinator.syntactical. 














object OrderDsl extends StandardTokenParsers { 
lexical.reserved += 


(TEG™, "buy", "Sell", "min", "max", "for", "account", "shares", tat) 
lexical.delimiters += ("(", ")", ",") p 
lazy val order - 词法 分 隔 符 和 保留 字 
items - account spec e 
lazy val items - 顺序 组 合子 (~) 
"(" ~> replsep(line item, ",") <~ ")" 


P 重复 组 合子 ， 带 分 隔 符 


lazy val line item = 
security spec ~ buy sell ~ price spec 


lazy val buy sell - 


"cto" ~ (" buy" | "Ssell") 
Xk4M- 2B 4 
lazy val security spec - o SREP (|) 
numericLit - (ident «- "shares") 


lazy val price spec - 
"at" ~> (min max?) ~ numericLit 


lazy val min max - 
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lazy val account spec - 
"for" ~> "account" ~> stringLit 


} 
用 上 面 的 文法 定义 可 以 成 功 分 析 下 面 的 DSL 刻 段 : 
(100 IBM shares to buy at max 45, 40 Sun shares to sell 


at min 24, 25 CISCO shares to buy at max 56) 
for trading account "A1234" 


Sx ux STIL Y MIRR TH Pra EH PEG f *S— 4T DSL. 稍 后 我 们 会 对 它 进 行 一 些 再 加 工 ， 
让 它 输出 反映 领域 抽象 的 语义 模型 。 

现在 我 们 知道 了 文法 写 出 来 是 什么 样子 , 也 知道 了 它 能 处 理 什么 样 的 语言 ,下面 可 以 着 手 探 
究 每 一 条 文法 规则 的 具体 分 析 过 程 了 。 

正式 开始 之 前 ,我 们 需要 提 一 提出 现 于 文法 规则 开头 的 那 组 词法 分 隔 符 ( lexical delimiter )@， 
这 个 列表 里 的 字符 在 输入 流 中 起 划分 词法 单元 的 作用 。 另外 我 们 还 定义 了 一 组 准备 用 在 语言 里 的 
保留 字 ， 即 代码 清单 8-2 中 的 lexical .reserved 列 表 。 本 节余 下 的 部 分 会 对 Scala 库 中 提供 的 组 
合子 予以 透彻 的 解说 ， 教 会 你 用 它们 来 搭建 自己 的 语言 。 如 果 要 查阅 Scala 组 合子 的 细节 信息 ， 
Scala 发 行 包 中 的 源 代码 是 最 完整 的 资料 来 源 。 

1. 每 一 条 文法 规则 都 是 一 个 函数 

文法 规则 对 领域 概念 进行 建 模 。 规则 要 有 合适 的 命名 , 这样 才能 正确 传达 其 模型 代表 的 领域 
概念 。 规 则 的 主体 部 分 采用 EBNF 形 式 记 述 ,我 们 先前 在 ANTLR 中 定义 上 下 文 无 关 文法 时 ， 用 的 
也 是 相同 的 EBNF 形 式 。 

每 一 条 规则 返回 一 个 Parser， 代 表 数 体 的 返回 值 。 如 果 男 数 体 是 由 通过 组 合子 连接 起 来 的 
多 个 分 析 器 构成 的 ， 那 么 依次 使 用 所 有 的 组 合子 之 后 得 到 的 最 终结 有 末 ， 才 是 规则 最 后 返回 的 
Parser。 目 前 我 们 假定 所 有 的 规则 都 返回 一 个 Parser [Any]， 等 到 8.3.4 节 我 们 再 介绍 怎样 在 规则 体 
中 通过 定制 晒 数 返回 具体 类 型 的 分 析 需 。 


我 们 编写 文法 规则 ， 务 必 记 住 一 条 DSL 设 计 的 黄金 守则 : 正确 地 命名 文法 规则 ， 

让 名 字 反 映 规则 建 模 的 领域 概念 。 在 用 分 析 器 组 合子 设计 外 部 DSL 的 过 程 中 ， 文 
法 规则 起 着 规划 蓝图 的 作用 ， 是 我 们 和 领域 专家 一 起 审议 的 凭据 。 它 们 氢 述 简练 、 含 义 
丰富 ， 而 且 能 够 恰当 地 向 领域 人 员 传 递 易 于 理解 的 信息 。 

















2. 顺序 组 合子 

Scala 语 言 用 “~” 符 号 表示 顺序 组 合子 。 我 们 可 以 在 代码 清单 8-2 的 位 置 @ 找 到 它 。 简便 起 见 ， 
用 符号 “~” 来 命名 ， 但 它 其 实 只 是 Parsers [T] 类 中 定义 的 一 个 普通 方法 。 

Scala 允 许 中 级 运算 和 从 的 书写 形式 ， 因 此 a ~ pb 其 实 等 同 于 a.~(b) 。 顺 序 组 合子 写成 中 绥 形 
式 时 ,语句 看 上 去 如 同 按 EBNF 形 式 书写 的 样式 。 男 外 ，Scala 语 言 的 类 型 推断 特性 使 得 语句 显得 
更 直观 。 

我 们 再 从 代码 清单 8-2 中 挑选 一 处 细节 来 说 明 顺 序 组 合子 的 工作 原理 。 在 位 置 @, items 接 收 
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到 传 给 分 析 需 组 合体 的 原始 输入 ， 于 是 它 尝试 调用 以 items 命 名 的 规则 体 (或 方法 ) 来 分 析 输 入 
合 ， 如 果 分 析 成 功 ， 即 产生 一 个 ParseResult ， 假 设 叫 做 *1。 然 后 序列 中 的 下 一 个 分 析 需 
account_spec， 开 始 处 理 items 余 下 的 输入 。 如 果 也 分 析 成 功 并 产生 ParseResult r2, JA 
这 时 “~” 组 合子 将 返回 一 个 结果 类 型 为 (rl1，r2) 的 Parser。 

3. RHET 

Scala 库 用 “|” 符 所 表示 蔡 代 组 合子 。 和 百代 组 合子 以 回 淹 方 式 查找 备 选 规则 。 只 有 当前 一 个 
分 析 天 发 生 可 恢复 失败 ， 并 且 人 允许 进行 回溯 的 时 候 ， 蔡 代 组 合子 才 生 歼 。 

请 看 代码 清单 8-2 的 位 置 @, 输入 首先 进入 第 一 条 备 选 规则 "to" ~> "buy". 定义 在 Parsers 
特征 里 面 的 一 个 隐 式 转换 把 string 转 换 为 Parsers [String]。 如 果 分 析 成 功 ， 则 不 用 理会 后 面 
的 任何 替代 规则 ， 分 析 结 果 直 接 作 为 bpuy_sell1 的 结果 返回 。 如 果 分 析 不 成 功 ， 则 尝试 下 一 条 备 
选 规则 "to" ~> "sel1"。 如 果 这 次 的 分 析 成 功 了 ， 就 返回 其 结果 。 分 析 需 总 是 按照 备 选 规则 的 
书写 顺序 决定 选择 的 先后 次 友 。 

4. 选择 性 顺序 组 合子 

这 种 组 合子 在 “~>” 和 “<~” 方 法 中 实现 ,分 别 选 择 性 地 保留 右边 的 结果 和 左边 的 结 
选择 性 顺 友 组 合子 常用 于 别 除 那些 不 属于 语义 檬 型 构成 部 分 的 信息 。 也 就 是 说 , 虽然 我 们 需要 识 
别 整 个 序列 ,但 只 有 其 中 一 个 分 析 恬 的 结果 是 我 们 感 兴趣 的 。 

再 看 代码 清单 8-2。 我 们 以 位 置 个 的 代码 来 说 明 选 择 性 顺序 组 合子 的 原理 。~> 的 用 法 类 似 于 ~， 
只 不 过 它 仪 保留 运算 符 右 侧 分 析 右 的 结果 。 例 中 的 " ("在 后 续 处 理 中 是 不 需要 的 ， 因 此 不 在 结 
中 保留 。<~ 方 法 同样 与 ~ 用 法 相似 ， 但 仪 保留 运算 符 左 侧 分 析 屁 的 结果 。 例 中 的 ") "在 后 续 处 理 
中 也 是 不 需要 的 ， 因 此 也 从 结果 中 去 除 。 

5. 重复 组 合子 

重复 组 合子 用 来 实现 重复 性 的 结构 。 表 8-2 给 出 了 重复 组 合子 的 各 种 变 体 。 


表 8-2 不 同 变 体形 式 的 重复 组 合子 






































变 体形 式 解 m 
(rep(p), p*) 重复 p 夫 次 或 更 多 次 
(repsep(p, sep), p*(sep)) 重复 p 零 次 或 更 多 次 ， 中 间 有 分 隔 符 
(rep1 (p), p+) 重复 p 一 次 或 更 多 次 
(replsep(p, sep), p*(sep)) 重复 p 一 次 或 更 多 次 ， 中 间 有 分 隔 符 
(repN(n, p)) 重复 p 正 好 n 次 


代码 清单 8-2 在 位 置 个 处 使 用 了 重复 组 合子 。items 由 一 个 或 多 个 1ine_item 组 成 ， 以 “2 
作为 分 隅 符 。 

6. 知识 点 间 的 联系 

许多 开发 者 都 有 一 个 共同 的 顾虑 ,担心 这 些 组 合子 可 能 难以 实现 。 的 确 , 我 们 必须 先 做 好 大 
量 的 铺垫 工作 ， 才 能 确保 组 合 分 析 需 的 效果 。 通 过 抽象 之 间 的 轻松 组 合 构造 更 大 的 抽象 ， 始 终 是 
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我 们 对 优秀 的 抽象 设计 的 最 高 追求 。 在 本 草 中 ,我 们 将 看 到 , 分 析 熏 组 合子 能 够 以 较 小 的 代码 编 
写 负 担 ， 建 立 一 种 具有 分 析 融 绑 定 能 力 的 抽象 。 

这 种 抽象 就 是 在 第 6 章 曾 经 出 现 的 Scala 的 Monad。 那 时 学 到 的 知识 现在 正好 派 上 用 场 , Monad 
化 的 操作 将 使 组 合子 的 实现 大 大 简化 。 





8.2.3 用 Monad 组 合 DSL 分 析 器 


分 析 益 组 合子 是 一 种 运用 函数 式 编程 的 原则 来 组 合 分 析 带 的 抽象 , 将 简单 基本 的 分 析 末 组 合 
成 更 大 更 复杂 、 语 言 识别 能 力 更 强 的 分 析 囊 。 图 8-7 形 象 地 表现 了 组 合子 的 作用 。 


e 


组 合子 
图 8-7 ”组 合子 将 较 小 的 分 析 器 组 合 起 来 ， 形 成 更 大 的 分 析 器 
我 们 从 上 一 市 得 知 , 顺序 组 合子 和 和 苦 代 组 合子 能 把 交 给 它们 的 输入 串联 起 来 。 那 么 这 种 串联 
具体 是 怎么 实施 的 呢 ? 
1. 实现 顺序 组 合子 的 笨 办 法 
我 们 先 来 考虑 Scala 顺 序 组 合子 的 实现 方案 。 代 码 清单 8-3 是 其 中 一 种 做 法 : 
代码 清单 8-3 ”实现 Scala 的 顺序 组 合子 


def ~ [U] (p: => Parser[U]): Parser[~[T, Ul] 











组 合 分 析 器 





ee 调用 当前 分 析 器 来 分 析 输 入 
def apply(in: Input) = T1 成 功 ! 把 余下 的 

Parser.this(in) match { 输入 传 下 去 
case Success(r1, next1) => p(next1) match { 
case Success(r2, next2) => Success((r1, rZ), next2) 
case Failure(msg, next) => Failure(msg, next) 

) 最 后 成 功 ! 

case Falilure(msg, next) => Failure(msg, next) 


} 





} 

这 个 实现 是 正确 的 ,组 合子 的 行为 完全 符合 要 求 。 当前 分 析 紫 处 理 原始 输入 流 并 进行 分 析 @。 8 
如 果 成 功 , 则 分 析 结 果 连 同 余下 的 输入 一 起 被 传递 给 参数 中 指定 的 下 一 个 分 析 右 进行 分 析 @@。 如 
果 也 成 功 了 ， 最 后 的 分 析 结 果 连 同 余下 的 输入 一 起 ， 作 为 最 后 的 分 析 需 ~ [T，U] 返 回 。Parsers 
trait 里 为 ~[T，U] 定 义 了 一 个 类 。 

那 这 个 实现 挺 不 错 的 ， 对 吧 ? 呢 ， 好 像 哪里 不 对 劲 。 你 看 出 来 问题 在 哪里 了 吗 ? 
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那些 担任 串 场 角 色 的 代码 占据 了 舞台 的 中 心 , 这 段 程 序 的 观众 很 难 在 一 片 喧 闵 的 掩盖 下 发 现 
表达 顺序 组 合 语义 的 核心 逻辑 。 这 种 含义 不 清 的 错误 应 该 时 时 引起 我 们 的 警觉 。 错误 的 根源 出 在 
代码 清单 8-3 的 抽象 层次 上 ， 我 们 用 了 非常 低层 次 的 抽象 来 编程 ， 因 此 导致 实现 细节 被 对 露 在 用 
户 面前 。 

2. 用 Monad 消 灭 串 场 代码 

观察 现在 的 组 合子 实现 , 那些 需要 被 谈 掩 起 来 的 细 市 , 都 是 一 些 人 负责 连接 组 合 各 抽象 的 串 场 
代码 。 而 我 们 从 第 6 章 就 知道 , Monad 特 别 擅长 解决 这 类 问题 。Monad 化 的 绑 定 操作 可 以 帮助 我 们 
无 颖 地 连接 各 抽象 , 它 在 Scala 语 言 里 的 对 应 实现 是 flatMap 组 合子 。 因 此 我 们 可 以 在 组 合子 的 设 
计 里 纳入 Monad 的 概念 ， 依 靠 各 种 Monad 化 的 抽象 来 组 合 分 析 需 。 为 了 防止 低层 次 的 具体 实现 细 
节 干 扰 组 合子 的 设计 ，Scala 组 合子 库 把 ParseResulLt 和 Parser 都 设计 成 Monad 化 的 抽象 。 也 就 
是 说 ， 我 们 不 需要 目 行 添加 任何 串 场 用 的 逻辑 ， 就 可 以 直接 把 多 个 Parser 和 ParseResult 抽 象 
连接 在 一 起 。 改 造 之 后 ， 我 们 的 顺 友 组 合子 实现 变 成 了 一 行人 简 单 的 for-comprehension 语 句 : 


def ~ [Ul(p: => Parser[U]): Parser[-[T, U]] = 
(for(a <- this; b <- p) yield new -(a,b)).named("-") 


这 就 对 了 ! -AE m HEBR TERI REA DRE AA EMERITA 


Monad 跟 我 们 的 DSL 实 现 有 什么 关系 呢 ? 

作为 DSL 设 计 者 ， 我 们 除了 使 用 一 个 库 ， 还 需要 对 其 内 部 的 实现 技术 有 所 了 解 。 
Scala 用 库 的 形式 来 提供 分 析 器 组 合子 , 其 实 是 在 告诉 我 们 , 这 些 组 合子 本 来 就 是 准备 要 
被 扩展 的 。 我 们 在 现实 中 必定 会 遇 到 需要 自行 实现 组 合子 的 情况 。 到 那个 时 候 ， 通过 各 
种 Monad 化 的 抽象 设计 来 连接 分 析 器 的 知识 就 会 派 上 用 场 。 


美好 的 结果 总 是 由 各 种 琐碎 而 关键 的 细节 文 撑 起 来 的 ,这 些 知 识 需 要 你 到 Scala 组 合子 库 的 源 
代码 中 去 发 掘 。 

编写 DSL 分 析 器 的 时 候 ， 可 以 用 Monad 来 改善 组 合子 的 设计 ， 这 个 话题 我 们 就 说 到 这 里 。 接 
下 来 ， 话 题 将 转 到 Scala 组 合子 库 的 另 一 项 特性 ， 它 也 是 实现 复杂 DSL 结 构 必 不 可 少 的 强力 工具 。 


















































8.2.4 左 递 归 DSL 语 法 的 packrat 分 析 


到 目前 为 止 ， 我 们 研习 过 的 奉 干 目 顶 癌 下 递归 下 降 分 析 需 (参阅 第 7 草 ) 都 只 能 处 理 固 定数 
量 的 前 脆 符 亏 集 ， 这 因此 限制 了 它们 所 能 识别 的 声言 种 类 。 我 们 的 DSL 很 有 可 能 含有 一 些 超出 稼 
E SI PA PESSBE 7J 18. FUB] Wer, 这 些 语法 或 者 无 法 被 正确 识别 , 或 者 识别 的 效率 太 低 。LL(1) 
4 ras CUL7.3.15 ) 只 用 一 个 前 瞻 符 号 来 搜寻 适用 的 文法 规则 ， 而 且 LL(PD 的 前 脆 符 号 集合 的 大 
小 也 是 有 限 的 ， 最 多 能 够 匹配 [个 符号 。 这 类 分 析 需 称 为 预测 分 析 器 〈predictive parser )， 因 为 它 
们 通过 预先 查看 输入 流 的 内 容 来 推测 适用 的 规则 。 

X4 25 —25S B np] P350 PEE PLZ, "HALE 3827 Xf (backtracking parser )。 它 们 通过 回 
退 并 逐条 党 试 备 选 规则 的 方式 来 推 新 下 一 条 适用 规则 。 我 们 从 上 文 对 Scala 组 合子 库 的 介绍 中 得 
知 ， 蔡 代 组 合子 就 有 这 样 的 能 力 ， 它 会 回溯 并 尝试 我 们 提供 的 其 他 备 选 文法 规则 。 
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预测 分 析 融 速度 很 快 ， 使 用 线性 时 间 解 析 ， 而 回溯 分 析 融 实现 会 轻易 地 退化 为 指数 时 间 。 请 
考虑 下 面 这 段 用 Scala 分 析 带 组 合子 写成 的 简单 的 文法 规则 ， 它 的 工作 是 对 表达 式 求 值 : 


lazy val exp = exp ~ ("+" ~> term) | 
exp ~ ("-" ~> term) | 
term 





Ti HEU exp TARIE X. , 如果 第 一 行 备 选 规则 开头 的 exp 成 功 了 ,但 随后 的 输入 不 是 +”， 
那么 分 析 厅 将 回 深 输 入 ， 改 为 尝试 第 二 行 备 选 规 则 。 这 时 分 析 帮 又 把 第 二 行 开头 的 exp 重 新 分 析 
— io 在 分 析 带 找到 一 条 完全 匹配 的 备 选 之 前 , 会 反复 出 现 重 新 分 析 的 情形 。 这 种 重复 性 的 分 析 
过 程 将 导致 指数 级 的 时 间 复 杂 度 。 

packratj Dra ( 见 8.6 市 文献 [3] ) 通过 中 间 结 果 记 忆 ( memoization ) 技术 来 解决 重复 计算 的 
问题 。packrat 分 析 从 会 缓存 它 执行 过 的 所 有 计算 ， 因 此 当 分 析 融 再 次 遇 到 相同 的 计算 时 ， 就 不 必 
骨 算 一 裔 ， 而 是 和 耻 接 从 绥 存 中 取出 结果 ， 其 时 间 复 琳 度 为 请 数 。packtrat 分 析 帮 通 过 回 济 的 方式 ， 
可 以 处 理 不 限 数量 的 前 瞻 符 号 。 为 外 ， 这 种 分 析 右 分 析 算 法 的 时 间 复 淋 度 是 线性 的 。 我 们 将 在 以 
下 几 节 说 明 packrat 分 析 器 的 优势 。 




















定义 “记忆 ”( memoization ) 是 一 种 实现 技术 ， 通 过 缓存 前 面 的 计算 结果 来 达到 避免 重新 计算 
的 目的 。 


1. 记忆 特性 提高 packrat 分 析 器 的 执行 效率 

我 们 应 该 怎样 实现 packrat 分 析 天 的 中 间 结 采 记 忆 特 性 呢 ? 这 取决 于 用 什么 语言 来 实现 
packrat 分 析 器 。 如 果 使 用 像 Haskel] 那 样 默认 采取 缓 求 值 ( lazy-by-default ) 的 语言 ,那么 完全 不 需 
要 为 实现 记忆 特性 做 任何 工作 。Haskell 本 和 号 就 是 按 需 求 调用 ( call-by-need ) 语义 来 实现 的 , 它 一 
方面 延迟 求 值 ,为 一 方面 记忆 已 求 值 的 结果 ， 以 备 后 续 使 用 。Haskell 通 过 纯 水 数 式 的 、 带 记忆 特 
性 的 回溯 分 析 硕 提供 最 完美 的 实现 。 

Scala 不 是 一 种 默认 采取 组 求 值 的 语言 。 分 析 需 组 合子 通过 使 用 一 个 特殊 的 、 带 有 绥 存 能 力 的 
Reader 来 显 式 实现 记忆 特性 。 从 下 面 的 片段 可 以 看 出 ，Scala 的 packrat 分 析 夫 扩展 了 Parsers 
trait， 并 在 其 中 般 入 一 个 实现 了 记忆 特性 的 特殊 Reader (PackratReader): 


trait PackratParsers extends Parsers { 
class PackratReader [+T] (underlying: Reader[T]) 
extends Reader[T] { 
EET 
j 
//.. 
J 


如 条 用 Scala 提 供 的 PackratParsers 实 现 来 执行 刚才 举例 的 exp 分 析 希 ， 效 率 将 大 为 提高 。 
虽然 分 析 需 匹配 第 一 行 备 选 时 失败 了 ， 但 对 该 行 开 头 的 exp 识 别 是 成 功 的 ， 这 个 识别 的 结果 将 被 
记忆 起 来 。 于 是 当 分 析 需 遇 到 第 二 行 备 选 开 头 的 exp 时 ， 就 不 必 再 执行 一 遍 识别 过 程 ， 而 是 直接 
从 缓存 中 取出 分 析 结 果 。 由 于 重用 了 执行 过 的 运算 ，packrat 分 析 可 以 在 线性 时 间 内 完成 。 
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2. packrat4 tfr 88 3c 35 2c 3 

即使 市 有 记忆 特性 ， 最 初 的 packrat 分 析 硕 设计 照样 处 理 不 了 左 递 归 的 文法 规则 。 实 际 上 , 任 
何 自 项 回 下 递归 下 降 分 析 恬 都 处 理 不 了 左 递 归 。, 我们 可 以 继续 用 刚才 的 表达 式 求 值 分 析 需 来 进行 
说 明 : 


lazy val exp = exp ~ ("+" ~> term) | 
exp ~ ("-" ~> term) | 
term 





如 末 把 “100-20-45” 这 样 的 表达 式 输 入 分 析 带 会 出 现 什么 情况 呢 ?”exp 分 析 和 右上 首先 会 查找 
记忆 表 , 确定 是 否 有 上 自身 的 求 值 结果 。 由 于 这 是 站 次 尝试 进行 分 析 , 记忆 表 是 空 的， 表示 为 Ni1。 
于 是 exp 分 析 器 尝试 对 规则 体 进行 求 值 , 而 不 洱 的 是 规则 体 又 以 exp 开 头 。 所 以 exp 分 析 右 就 这 样 
陷入 了 无 限 递 归 的 死 循 环 。 

任何 左 递归 的 规则 都 可 以 通过 一 个 变换 过 程 , 转 为 等 价 的 非 左 递归 文法 。 有 些 packrat 分 析 帮 
实现 可 以 对 和 耻 接 左 递归 的 规则 进行 变换 。 但 变换 后 的 规则 会 较为 星 深 而 难以 阅读 , 并且 令 AST 的 

现在 的 packrat 分 析 需 通过 一 种 新 的 记忆 技术 实现 了 对 ( 直接 和 间接 ) 左 递 归 的 支持 , 该 技术 
最 先 由 Warth 等 人 实现 〈 人 参见 8.6 节 文献 [4] )。 

Scala 组 合子 库 里 的 pac kratParsers 实 现 了 这 种 形式 的 记忆 特性 , 可 支持 文法 规则 中 的 直接 
及 间接 左 递 归 。 我 们 会 在 8.3 市 看 到 用 Scala 分 析 带 处理 左 递归 文法 的 例子 。 关 于 该 特性 实现 技术 
的 详情 , 请 在 Scala 源 代码 中 查阅 与 packrat 分 析 帮 相 关 的 部 分 。 除了 能 在 线性 时 间 内 完成 不 限 前 腑 
符号 数量 的 回 油分 析 外 ，parsers 分 析 硕 还 有 更 多 适合 用 于 外 部 DSL 实 现 的 特性 。 

3. packrat 分 析 器 提供 无 扫描 器 的 语法 分 析 

典型 的 分 析 带 会 单独 设立 一 个 扫描 带 ， 用 于 输入 流 词法 单元 的 划分 。packrat 分 析 帮 不 需要 单 
独 的 扫描 器， 其 表达 词法 和 表达 上 下 文 无 关 文 法 的 形式 体系 是 统一 的 。 

你 可 能 想 知 道 无 扫描 硕 的 语法 分 析 有 什么 优点 。 首 先 分 析 需 不 需要 安排 一 个 单独 的 词法 分 析 
全 抽象 ， 因 为 只 有 一 套 统 一 的 声 法 需要 处 理 。 由 于 采用 packrat 分 析 的 文法 在 一 个 抽象 里 去 插 了 整 
个 分 析 阶 段 ， 所 以 文法 间 的 组 合 会 较为 容易 。 如 果 我 们 需要 组 合 多 种 外 部 DSL， 这 样 的 设计 能 提 
高 组 合 能 力 。 

当然 , 无 扫描 融 的 语法 分 析 也 是 有 缺点 的 。 为 了 区 分 保留 字 和 标识 符 ,， 我 们 需要 为 文法 补充 
一 些 作为 消除 收 义 用 途 的 额外 信息 。 此 外 , 语言 中 的 分 隔 符 也 需要 额外 的 消除 下 义 处 理 才 能 被 正 
确 识别 。 

4. 支持 语义 谓词 

除了 packrat 分 析 徊 本 吴 具 有 的 语法 匹配 能 力 外 ,我 们 还 可 以 在 文法 规则 中 添加 语义 谓词 。 这 
些 语义 谓词 可 以 根据 其 他 语法 实体 的 语义 来 判断 分 析 是 否 成 功 。 

5. 依 序 选择 

packrat 分 析 需 不 同 于 其 他 使 用 上 下 文 无 关 文 法 的 分 析 箱 ， 其 蔡 代 组 合子 只 文 持 依 序 选择 。 因 
此 如 条 组 合子 的 几 个 备 选 项 开头 部 分 有 重合 ， 应 该 把 匹配 长 度 较 长 的 备 选项 排 在 前 面 。 
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packrat 分 析 顶 用 依 序 选择 的 规定 来 消除 LR 分 析 融 下 可 能 出 现 的 “ 移 进 / 归 约 ” 神 突 和 “ 归 约 / 
归 约 ”冲突 。 

现在 ,我们 理解 了 什么 是 分 析 需 组 合子 ,也 知道 用 packrat 分 析 需 可 以 得 到 高 效率 的 分 析 设 计 。 
8.4 世 时 ， 我 们 会 再 回 到 packrat 分 析 需 这 个 话题 ， 并 且 用 它 来 设计 一 个 DSL。 


EA 是 否 有 必要 把 一 个 DSL 实 现 内 所 有 的 分 析 器 都 设计 成 packrat 分 析 器 ? 





通常 DSL 只 在 某 些 局 部 才 需 要 人 处理 复杂 的 左 递归 文法 规则 。 我 们 可 以 在 这 些 地 方 使 用 packrat 
ARE, 而 其 他 地 方 还 是 用 一 般 的 递归 下 降 分 析 右 ,Scala 分 析 屁 组 合子 库 允许 我 们 自由 地 混用 普 
通 分 析 器 和 packrat 分 析 器 。 

到 目前 为 止 , 本 章 介绍 了 分 析 顺 组 合子 的 基础 知识 , 说 明了 怎样 在 函数 式 语言 里 使 用 这 些 组 
合子 来 设计 外 部 DSL， 还 对 一 个 用 Scala 提 供 的 组 合子 库 实现 的 交易 指令 处 理 DSL 文 法 样 例 (代码 
清单 8-2 ) 进行 了 详细 的 分 析 。 经 过 以 上 学 习 ， 你 肯定 已 经 意识 到 ， 用 分 析 需 组 合子 这 样 的 吨 数 
式 手段 来 设计 DSL， 所 要 求 的 思维 方式 是 不 同 的 。 我 们 决定 实现 策略 的 前 提 ， 是 掌握 了 各 种 技术 
的 相关 能 力 和 优 缺 点 。 下 一 节 ,， 我 们 将 融 汇 全 书 关 于 DSL 设 计 的 全 部 讨论 内 容 。 其 中 的 重点 是 辩 
析 内 部 DSL、 使 用 分 析 需 生成 硕 的 外 部 DSL、 使 用 分 析 需 组 合子 的 外 部 DSL 三 者 之 间 的 差异 。 


8.3 用 分 析 器 组 合子 设计 DSL 的 步 又 


分 析 震 组 合子 结合 了 EBNEF 文 法 系统 的 简洁 特性 和 纯 困 数 的 强大 组 合 能 力 。 我 们 已 经 讲解 了 
很 多 分 析 器 组 合子 的 特性 ， 现 在 可 以 从 一 个 DSL 设 计 者 的 角度 ， 试 着 把 它们 融 汇 起 来 ， 实 际 制 作 
一 套 完 整 交 易 指 令 处 理 领 域 专用 语言 。 

我 们 用 不 同 的 宿主 语言 如 Ruby、Groovy 和 Scala 设 计 过 内 部 DSL， 也 答 试 了 分 析 需 生成 名 和 
DSL 工 作 人 台 方 式 下 的 各 种 外 部 DSL 设 计 技 法 。 下 面 即 将 要 进行 的 是 分 析 融 组 合子 的 实际 演练 ， 它 
会 成 为 我 们 放 在 随身 工具 箱 里 的 又 一 件 得 力 工 具 。 表 8-3 是 几 种 不 同 实现 技术 的 对 比 表 格 ， 在 开 

人 设计 之 前 ， 让 我 们 先 看 看 内 部 DSL 设 计 方 式 和 两 种 外 部 DSL 设 计 方 式 之 则 的 区 别 。 


表 8-3 DSL 实现 技术 的 对 比 






























































外 部 DSL 
特 — dE 内 部 DSL —— - 
分 析 器 生成 器 分 析 器 组 合子 
完全 在 宿主 语言 是 ,可 以 完全 内 髓 于 宿主 语言 (如 和 否 。 通 常 需要 外 部 的 分 析 器 “ 是。 宿主 语言 必须 支持 高 阶 
构建 Scala) ， 也 可 以 是 生成 式 的 (如 生成 器 设施 (ULEX,  — MOX RIBG E 
Ruby 和 Lisp ) YACC 和 ANTLR ) (如 Scala 和 Haskell ) 
供 最 终 用 户 使 用 的 ”是 。DSL 产 物 是 宿主 语言 的 方法 ” 否 。 分 析 设 施 对 DSL 作 语法 ” 否 。 每 个 词法 单元 都 被 转换 
DSL 是 可 直接 运行 ”调用 分 析 , 然 后 执行 每 个 符号 所 ”成 一 个 Parser 实 例 , 然后 通过 
的 宿主 语言 代码 关联 的 函数 组 合子 串联 起 来 
最 终 用 户 需 要 掌握 基本 上 是 , 异常 和 错误 处 理 要 借助 ”和 否 。DSL 是 通过 分 析 需 生成 ” 否 。DSL 是 借用 和 宿主 语言 提 
宿主 语言 宿主 语言 的 设施 。 而 且 DSL 本 身 就 ”器 产生 的 一 种 全 新 语言 供 的 语言 处 理 设施 建立 的 一 


必须 是 箱 主 语言 下 的 有 效 程序 种 新 语言 
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希望 以 上 对 比 能 带 助 你 理 清 概念 。 接 下 来 我 们 就 以 代码 清单 8-2 的 文法 设计 为 基础 ， 按 部 就 
班 地 建立 一 个 完整 的 语言 模型 。 第 一 步 , 我 们 需要 验证 一 下 该 文法 是 否 真 的 能 识别 我 们 的 语言 
^E i. — FRA PTS o 








8.3.1 第 一 步 : 执行 文法 

观察 代码 清单 8-2 的 设计 ， 这 上 段 文法 已 经 完整 地 定义 了 我 们 的 交易 指令 处 理 DSL， 能 够 完全 
胜任 对 清单 后 DSL 脚 本 的 分 析 工 作 。 下 面 这 段 程序 将 依据 前 面 的 文法 定义 处 理 DSL 脚 本 ， 并 在 分 
析 成 功 时 产生 输出 。 


* `~ 2 hung R 
代码 清单 8-4 运行 DSL 处 理 程序 
val str = """(100 IBM shares to buy at max 45, 40 Sun shares 
to sell at min 24, 25 CISCO shares to buy at max 56) 
lor account "A1234"""" 
import OrderDsl. i Bn 
p x Mi 调用 order 分 析 器 


order (new lexical.Scanner(str)) match { 





case Success(order, _) => 

printin(order) 
case Failure (msg, _) => SY So " + msg) Ó 分 析 成 功 
case Error (msg, _) => printlin("Error: " + msg) 


) 

在 这 段 程序 里 , def SHE F DSLSGE FRA I es R orders Tár ( 见 代码 清单 8-2 的 文法 
定义 )。 如 果 我 们 输入 的 脚本 分 析 成 功 了 ， 那 么 就 把 输出 打印 出 来 @; 否则 打印 出 分 析 吕 产生 的 错 
误 消 息 。 单纯 打印 出 分 析 带 的 默认 输出 并 无 太 大 意义 ,对 于 语言 的 分 析 也 没什么 实际 作用 。 在 下 一 
节 里 ， 我 们 会 在 这 个 地 方 生成 语义 模型 。 不 过 现在 ,你 能 猿 出 打印 语句 @ 会 输出 什么 结果 吗 ? 


























为 了 找到 答案 ， 我 们 要 从 分 析 过 程 产生 的 分 析 树 春 于 。 请 看 图 8-8。 


order 





line item 





account spec 





price spec 


puy- DELE min max 
security spec | 
mm 


(100 IBM shares to buy at max 45 ,...,... | ) for account "A1234" 


图 8-8 ”根据 代码 清单 8-2 的 文法 定义 产生 的 分 析 树 。 省 略 号 的 部 分 代表 可 以 出 现 多 个 
line_item 成 分 。 所 有 成 分 最 终归 约 为 树 根 处 的 oraer 市 点 
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这 个 分 析 过 程 与 我 们 在 第 7 章 讲解 用 ANTLR 开 发 外 部 DSL 时 介绍 的 分 析 过 程 相同 。 在 分 析 过 
程 的 每 一 步 ,我 们 都 把 分 析 结 有 果 作 为 字符 串 输出 。 输 出 内 容 取 决 于 我 们 搭建 文法 时 使 用 的 组 合子 。 
例如 DSL 脚 本 中 “100 IBM shares” 的 部 分 , 负责 归 约 它 的 文法 规则 是 1azy val security spec 
= numericLit ~ (ident <~ "shares"), 因为 我 们 用 了 < -~ 组 合子 ， 所 以 其 中 的 "shares" 部 
分 被 从 输出 中 浊 除 。 整 个 片段 的 分 析 结 果 由 numericLit 和 iaqent 的 结果 顺序 组 合 而 成 ， 即 输出 
为 (100~IBM) 。 注 意 *ep1sep 组 合子 会 生成 一 个 由 所 有 1ine_item 抽 象 组 成 的 List。 可 选项 组 
合子 (? ) 会 生成 一 个 Scala 语 言 的 option[] 结 构 。 


对 图 8-5 分 析 树 上 所 有 的 节点 都 进行 类 似 的 处 理 之 后 , 我 们 得 到 DSL 脚 本 分 析 成 功 的 最 终 输 出 : 























(List((((100-IBM)-buy)-(Some(max)-45)), 
(((40-Sun)-sell)-(Some(min)-24)), 
(((25-CISCO)-buy)-(Some(max)-56)))-A1234) 


这 样 一 个 纯 文本 的 输出 , 真 的 能 在 现实 的 应 用 程序 里 起 作用 吗 ? 确实 不 能 , 将 一 段 由 多 元 组 
和 列表 汇聚 起 来 的 DSL 脚 本 变 成 无 结构 的 文本 表示 ， 这 样 的 分 析 成 采 没 有 任何 现实 意义 。 因 此 ， 
我 们 要 建立 起 orger 抽 和 象 的 语义 模型 , 然后 在 分 析 过 程 中 利用 另外 一 些 组 合子 回 该 模型 填 和 实际 
的 内 容 。 














8.3.2 第 二 步 : 建立 DSL 的 语义 模型 


现在 我 们 知道 , 前 面 默认 的 分 析 结 果 输 出 训 无 用 处 , 我 们 需要 在 应 用 的 上 下 文 里 赋予 其 意义 
和 功用 。 那么 具体 应 该 怎么 做 呢 ? 答案 很 简单 : 我 们 需要 用 一 个 更 合适 的 抽象 来 充当 DSEL 的话 义 
模型 。 

为 Order 抽象 建立 语义 模型 并 不 是 难题 ,但 构建 好 的 模型 ， 要 怎样 结合 到 分 析 过 程 中 去 呢 ? 

Scala 组 合子 库 准备 了 一 些 孔 数 施 用 组 合子 , 可 以 用 在 对 分 析 结 果 的 变换 操作 上 。 这些 组 合子 
帮助 我 们 把 语义 模型 和 文法 规则 集成 在 一 起 。 我 们 分 析 DSL 脚 本 ， 同 时 调动 这 些 组 合子 ， 一 块 一 
块 地 爸 起 语义 模型 。 各 分 析 需 不 再 〈 像 代码 清单 8-2 那 样 ) 输出 默认 的 返回 值 ， 而 是 返回 语义 模 
型 需要 的 属性 。 这 样 ， 当 分 析 过 程 完成 时 ， 作 为 语义 模型 的 AST 也 就 完整 地 建立 起 来 了 。 

下 面 ， 我 们 来 详细 了 解 一 下 这 些 函 数 施用 组 合子 。 

1. 函数 施用 组 合子 

Scala 有 两 个 图 数 施用 组 合子 : ^^fl^^^. RRAIBJZH A THE, ^^fll^^^dibzeParsers trait 里 
的 方法 。 对 于 分 析 需 p 和 因数 E， 表 达 式 p ^^ EfE 将 产生 一 个 识别 p 的 结果 的 分 析 恬 。 如 果 p 分 析 成 
功 ， 则 组 合子 将 对 p 的 结果 施用 因数 E。 请 思考 下 面 的 文法 片段 : 


lazy val order: Parser[Order] = items ~ account spec ^^ 
( case i ~ a => Order(i, a) ) 


^^fH a d X]3exsxitems ~ account_spec 的 分 析 结 果 施 用 了 个 匿名 的 模式 匹配 困 数 。 
因此 order 分 析 恬 输出 的 不 是 默认 返回 值 ， 而 是 一 个 Parser [order]。 值 得 注意 的 是 ， 匿 名 洱 
数 返 回 的 本 来 是 一 个 order 抽 象 ， 但 由 于 Parsers trait 内 定义 的 隐 式 转换 ， 被 提升 为 相应 的 
Parser 类 型 。 对 于 这 个 细节 的 详细 说 明 可 以 参看 图 8-9 及 其 后 的 解释 。 
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^^ 人 ^ 组 合子 类 似 于 ^^ 组 合子 ， 只 不 过 ^^ 是 对 分 析 虽 p 的 结果 施用 一 个 孙 数 EE， 而 ^^^ 则 是 将 分 
析 融 p 的 结果 符 换 为 一 个 指定 的 取信 z。 

2. 偏 函数 施用 组 合子 

Scala 的 俩 冰 数 施用 组 合子 是 ^ 吗 ?对 于 分 析 硕 p 和 仿 吨 数 E， 表 达 式 p ^? (f, error) Æ— 
个 识别 p 的 结果 的 分 析 器 。 如 果 p 分 析 成 功 ， 旦 EE 在 p 的 结果 上 有 定义 ， 则 组 合子 对 p 的 结果 施用 也 
数 E。 如 果 f 不 适用 ， 出 现 srror 并 给 出 相应 的 理由 。 

我 们 的 最 终 目 标 是 解析 DSL 脚 本 并 建立 一 个 供 核 心 应 用 使 用 的 领域 模型 。 对 于 交易 指令 处 理 
DSL 来 说 ，order 抽 象 即 为 其 中 一 个 核心 的 领域 构造 产物 。 那么 下 一 节 ， 就 让 我 们 运用 代码 清 
8-2 定 义 的 文法 和 刚刚 学 会 的 几 个 组 合子 来 建立 这 个 重要 的 order 抽 象 。 











8.89.8 ”第 三 步 : 设计 Order 抽 象 


我 们 打算 自 底 加 上 地 构建 ordqer 抽 象 ， 这样 随 着 语法 分 析 的 步 又 进展 ,组 成 抽象 的 那些 构造 
单元 就 正好 对 应 地 成 为 一 个 个 AST 方 点。 很 容易 想到 ,为 了 达到 这 种 设想 中 的 效果 ,我们 可 以 用 
Scala 的 case 类 来 建 模 抽 象 的 构造 单元 ， 然 后 通过 也 数 施 用 组 合子 直接 将 其 插入 到 文法 规则 之 中 。 
( 对 Scala 语 言 case 类 的 详细 介绍 参见 附录 D。 ) 

首先 请 看 下 面 的 order 模 型 。 它 既是 语义 模型 ， 也 是 分 析 震 要 和 后 成 的 AST。 


代码 清单 8-5 ”交易 指令 处 理 DSL 的 语义 模型 


package trading.dsl 

















object AST { 
trait PriceType 
case object MIN extends PriceType 
case object MAX extends PriceType 


case class PriceSpec(pt: Option[PriceType], price: Int) 
case class SecuritySpec(qty: Int, security: String) 


trait BuySell 
case object BUY extends BuySell 
case object SELL extends BuySell 


case class LineItem(ss: SecuritySpec, 
bs: BuySell, ps: PriceSpec) 


case class Items(lis: Seq[LineItem]) 
case class AccountSpec(account: String) 


case class Order (items: Items, as: AccountSpec) 


} 





NY Y 





是 再 普通 不 过 的 Scala 代 码 ， 我 们 在 第 6 章 设 计 内 部 DSL 的 时 候 就 号 过 很 多 类 似 的 。 清 单 里 
的 这 些 类 要 被 分 派 、 插 入 到 各 目 对 应 的 文法 规则 里 ,然后 在 实际 生成 AST 的 时 候 再 汇合 起 来 ,组 
成 我 们 现在 看 到 的 样子 。 


RR 区 
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8.3.4 第 四 步 : 通过 函数 施用 组 合子 生成 AST 





有 了 请 义 模型 后 ， 我 们 就 可 以 在 分 析 过 程 的 每 一 个 步 又 里 添加 构造 AST 所 需 的 Scala 组 合子 。 
不 管 通过 什么 技术 手段 来 处 理 DSL， 最 终 目 标 总 是 产生 一 个 可 供应 用 在 别处 使 用 的 抽象 。 


下 面 的 代码 清单 在 代码 清单 8-2 的 文法 基础 上 深 加 了 枉 数 施用 组 合子 。 


代码 清单 8-6 ”交易 指令 处 理 DSL 的 AST 


import scala.util.parsing.combinator. 
import scala.util.parsing.combinator.syntactical... 


object OrderDsl extends StandardTokenParsers { 
lexical.reserved += 
("to", "buy", "Sell", "min", "max", "for", "account", "shares", "at") 


lexical.delimiters += ("(", 9. S. 2») 


让 分 析 器 能 够 访问 语义 模型 


import AST. 


lazy val order: Parser[Order] - 
items - account spec ^^ ( case i - a -» Order(i, a) ) 


函数 施用 组 合子 ^^ 


lazy val items: Parser[Items] = 
"(" ~> replsep(line item, ",") <~ ")" ^^ Items 


lazy val line item: Parser[LineItem] - 
security spec ~ buy sell ~ price spec 
( case s ~ b ~ p => LineItem(s, b, p) j 


^ 


lazy val buy sell: Parser[BuySell] - 


"to" ~> "buy" ^^^ BUY | 
"to!" ~> "ge]]" ^^^ SET, 函数 施用 组 合子 ^^^ 
lazy val security spec: Parser[SecuritySpec] = 
numericLit - (ident «- "shares") ^^ 
( case n ~ s => SecuritySpec(n.toInt, s) j 
lazy val price spec: Parser[PriceSpec] - . 含 函 数 施用 组 合子 ^? 
"at" ~> (min max?) ~ numericLit ^? 
({ casem ~ p if p.toInt > 20 => PriceSpec(m, p.toInt) j, 


(m => "price needs to be > 20" )) 


lazy val min max: Parser[PriceType] - 
"min" ^^^ MIN | "max" ^^^ MAX 


lazy val account spec: Parser[AccountSpec] - 
"for" ~> "account" ~> stringLit ^^ AccountSpec 


J 


只 要 束 悉 每 个 组 合子 的 含义 ,这 段 代码 基本 上 是 不 言 目 明 的 。 在 大 多 数 规则 里 面 , 我 们 用 ^^ 
组 合子 解构 分 析 带 返回 的 多 元 组 ， 并 将 其 鹏 入 到 紧 跟 其 后 的 匿名 模式 匹配 消 数 。 图 8-9 对 一 段 文 





法 规则 样本 的 归 约 过 程 进行 了 训 析 ， 从 语义 的 角度 解释 了 项 后 发 生 的 活动 。 


209 第 8 齐 用 Scala 语 法 分 析 器 组 合子 设计 外 部 DSL 


顺序 组 合子 提取 两 个 分 析 器 的 结果 ， 凑 用 于 模式 匹配 
成 一 个 ~ [Items, AccountSpec] 实 例 的 匿名 函数 


ZR 


items  aqococount spec ^^ ò case L ~ à => Order(i, a) | 


y | 

© i|@ 获取 各 属性 并 创建 0rder 对 象 
z E 
E 3 O 
p U 
E a 通过 implicit def accept (e: Elem): 
^ P Parser[Elem] = //.. 转换 为 Parser [Order] 
S f 9 

lazy val account spec: Parser [AccountSpec] = 3x [B] Parser [Order] 


"ror" ~> "account" ~> stringLit ^^ AccountSpec 


lazy val items: Parser[Items] = 
"X" ~> replsep(line_item, ",") <~ ")" ^^ Items 


图 8-9 一 条 规则 样本 从 归 约 过 程 开 始 到 最 终 返 回 Parser[oraer] 的 详细 步骤 。 items 和 account_ 
spec 都 是 上 游 的 Parser， 分 别 在 全 和 人 @ 汇 人 此 规则 。 顺 序 组 合子 执行 Parser [Items] 和 
Parser[AccountSpec], 并 将 两 者 的 结果 构造 为 一 个 ~ 实例 ， 传 递 给 函数 施用 组 合子 合 ， 
模式 匹配 完成 后 全 ， 一 个 oraer 实 例 即 被 构造 出 来 @。 然 后 在 隐 式 转换 的 作用 下 ，oraer 
实例 被 提升 为 Parser 类 型 全 ， 并 返回 @ 


图 8-9 有 一 条 规则 没有 按照 “^^ 组 合子 加 模式 匹配 ”的 格式 书写 : 


lazy val items: Parser[Items] = 
"(" ~> replsep(line item, ",") <~ ")" ^^ Items 


TEXXAR LU EB ,— RISA GB SE — T Eee 4 BRAVO PR, IE AEH T Items iE s. 
为 ^“^ 组 合子 的 前 一 个 分 析 器 返回 的 是 sea [LineItem] 类 型 的 单一 值 ， 正 好 可 以 直接 作为 Items 
构造 器 的 参数 , 所 以 我 们 可 以 采用 这 样 的 写法 。account_spec 对 应 的 规则 也 采用 了 相同 的 技巧 。 

代码 清单 8-6 用 到 偏 函 数组 合子 ^ 了 四 ? @@ 偏 本 数 有 可 能 在 分 析 器 的 返回 值 上 没有 定义 ， 针 对 
这 样 的 例外 情况 , 我们 预备 了 只 在 特殊 上 下 文 内 生效 的 错误 消息 。 请 考虑 这 样 的 场景 ， 假 设 脚 本 
中 设 定 的 单价 最 高 为 10; 这 时 分 析 是 成 功 的 。 但 是 我 们 在 偏 乌 数 的 定义 里 ， 加 入 了 验证 输入 的 语 
义 。 比 如 例 中 的 模式 匹配 语句 内 设置 了 验证 条 件 , 规定 单价 的 最 小 值 必须 高 于 20。( 附录 D 对 Scala 
的 模式 匹配 特性 有 进一步 的 介绍 ) 那么 此 时 在 代码 清单 8-6 的 位 置 @， 虽 然 分 析 器 报告 分 析 成 功 
了 ， 但 PartialFunction 在 分 析 需 的 返回 值 上 是 没有 定义 的 。 于 是 我 们 就 通过 这 样 的 技巧 实现 
了 验证 输入 ， 并 能 针对 特定 情况 报告 错误 的 语义 。 

至 此 ， 我 们 的 分 析 需 已 经 具有 完备 的 功能 ， 它 按照 语义 模型 规定 的 结构 返回 的 AST， 同 时 也 
是 一 个 可 以 直接 在 应 用 中 使 用 的 order 对 和 象 实例 。 
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á 你 有 没有 想 过 ， 为 什么 每 个 方法 都 是 以 lazy val 开 头 , 而 不 用 def 呢 ?因为 对 lazy 
val 方 法 的 求 值 会 被 推迟 到 真正 使 用 的 时 刻 ， 而 且 规 则 的 定义 顺序 是 无 关 紧 要 的 。 


视 资 一 下 自己 吧 ! 我 们 用 分 析 需 组 合子 完整 地 实现 了 一 种 外 部 DSL。 这 是 一 个 简洁 明了 的 
DSL 实 现 ， 其 语法 定义 的 表达 形式 仿照 了 大 家 出 悉 的 EBNF 人 风格。 其 语义 模型 不 但 仪 仪 是 由 普通 
的 Scala 抽 和 象 构成 的 ， 而 且 完 全 与 语法 定义 解 炸 。 作 为 设计 者 ， 我 们 还 能 要 求 更 多 吗 ? 

能 交 出 这 样 一 份 答卷 , 证 明 我 们 已 经 准备 好 尝试 更 高 级 的 练习 一 一 一 种 需要 用 到 packrat 分 析 
器 的 DSL 实 现 。 
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上 上 一世 我 们 用 分 析 硕 组 合子 开发 了 一 个 完整 的 DSL， 期 间 全 然 没 有 提起 过 packrat 分 析 希 。 
Packrat 分 析 需 很 特别 ,因为 它 可 以 做 到 普通 的 目 顶 癌 下 递归 下 降 分 析 需 做 不 到 的 事情 。 我 们 将 在 
这 一 节 里 开发 一 个 需要 依靠 packrat 分 析 需 才能 实现 的 新 的 DSL。 如 采 说 上 一 节 的 DSL 让 我们 认识 
到 分 析 各 组 合子 函数 式 的 威力 , 本 方 的 DSL 将 更 多 地 表现 Scala 的 PackratParsers 实 现 所 独 具 的 
20 s 


8.4.1. 待 解决 的 领域 问题 


交易 指令 处 理 领 域 已 经 被 我 们 摸索 得 差不多 了 , 接 下 来 我 们 打算 围绕 一 个 交易 后 的 业务 用 例 
来 建立 新 的 DSL。 

从 事 存 管 业务 的 金融 机 构 可 以 代表 客户 保管 证 券 。 客户 需要 做 的 只 是 在 金融 机 构 那 里 开设 一 
个 账户 ， 以 后 客户 严 入 走出 的 证 券 就 交 由 该 机 构 代 为 照管 维护 。 证 券 及 现金 交易 完成 后 ,要 按照 
一 定 的 规则 来 确定 保管 的 结算 银行 和 账户 ， 我 们 的 新 DSL 就 是 给 投资 经 理 用 来 设 定 这 些 规 则 的 。 
用 这 个 领域 的 术语 来 说 ,我 们 DSL 描 述 了 存 管 机 构 怎 样 为 其 客户 管理 结算 常设 指示 (settlement 
standing instruction, fHIPRSSI )。 本 节 随 附 的 插入 栏 简 要 说 明了 这 个 待 解决 的 领域 问题 。 























eo 金融 中 介 系统 ， 结 算 常设 指示 

交易 就 意味 着 要 在 交 萝 各 方 之 间 进 行 证 券 和 货币 的 交换 ,这 个 交换 过 程 发 生 在 交 萝 确立 之 
E, 称 为 交易 结算 。 结算 涉 及 交易 各 方 账户 之 间 进 行 资金 和 证 券 的 转移 。 根据 交易 类 型 、 证 券 
种 类 、 交 易 者 的 身份 以 及 其 他 各 种 因素 ， 结 算 可 能 涉及 多 个 账户 。 

为 了 便于 处 理 资产 的 转移 , 投资 经 理 需要 维护 一 个 常设 规则 数据 库 , 每 次 交易 后 从 中 查询 
如 何 进行 交 收 的 指示 。 这 些 规则 就 是 所 谓 的 SSI。SSI 要 经 常 性 地 公布 给 中 介 和 存 管 人 知晓 。 

交易 结算 通常 由 两 部 分 组 成 : 证 券 部 分 和 现金 部 分 。 两 部 分 的 结算 指示 可 以 相同 , 也 可 以 
不 同 。 如 果 和 希望 证 券 部 分 和 现金 部 分 分 别 结 算 ， 那 么 相应 的 SSI 需 要 明确 说 明 这 一 点 。 

举 个 例子 , 投资 银行 可 能 会 有 这 样 的 规则 表述 : 在 日 本 市 场 履 行 的 股票 交易 应 本 行内 部 结 
算 到 账户 A-123。 这 条 规则 将 适用 于 在 该 投资 银行 存 管 的 所 有 客户 。 规 则 可 以 有 层级 关系 ， 查 
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找 的 时 候 按 照 从 具体 到 宽泛 的 顺序 。 假 如 有 另 一 条 规则 表述 : 对 Sony 的 股票 交易 应 外 部 结算 到 
BOTMJ& P BO-234, 那么 综合 两 条 规则 在 日 本 市 场 履 行 的 所 有 股票 交易 中 | Sony 股 票 的 交 
jd 


易 将 通过 BOTM 结 算 ， 除 此 之 外 的 股票 交易 都 在 本 投资 银行 内 部 结算 。 


现实 中 什么 人 会 使 用 这 种 DSL? 首先 投资 经 理 是 潜在 的 用 户 , 其 次 还 有 投资 银行 内 所 有 从 事 
证 券 结算 的 业务 人 员 。 交 易 系 统 采 用 SSI 有 很 大 的 好 人 处， 因为 它 能 够 将 领域 问题 准确 而 精炼 地 癌 
领域 用 户 表 述 出 来 。 在 我 们 着 手 实 现 DSL 之 前 ， 先 来 看 看 SSI 在 交易 和 结算 流程 中 所 处 的 位 置 。 

1. 理解 业务 流程 

为 了 透彻 理解 SSI 在 交易 和 结算 流程 中 扮演 的 角色 , 请 看 图 8-10 和 图 8-11。 图 8-10 表 示 交 易 各 
方 之 则 的 基本 交易 及 结算 流程 。 








交易 有 一 个 
结算 过 程 
" d 
交易 各 方 
N s 
Li 支付 现金 


结算 的 时 候 才 真正 转移 证 券 
和 现金 到 交易 各 方 的 相应 账户 


图 8-10 ”交易 和 结算 流程 。 交 易 是 在 买卖 双方 之 间 达 成 交换 证 券 和 现金 的 承诺。 结 
是 对 交易 承诺 的 落实 ， 相 关 的 证 券 和 现金 被 实际 转移 到 对 方 的 账户 上 
图 8-11 说 明了 为 什么 没有 SSI 信 息 就 无 法 完成 交易 和 结算 流程 。 
(中 介 ) 


结算 过 程 涉及 的 各 方 


e. 他 们 需要 知道 银行 和 账户 
3 言 息 才能 进行 结算 
( 存 管 人 。 这 就 是 所 谓 的 SSI 


结算 过 程 
图 8-11 完成 结算 过 程 需 要 SSI。 中 介 及 受托 存 管 人 需要 掌握 银行 及 账 
户 信 息 ， 才 知道 该 回 何 处 交 收 证 券 和 现金 
我 们 对 什么 是 SSI 有 了 一 点 概念 之 后 ， 可 以 先 看 儿 条 有 代表 性 的 SSI 规 则 样 例 ， 以 对 投资 经 理 
希望 发 布 的 规则 有 个 直观 的 印象 。 
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2. 将 要 实现 的 SSI 规 则 样 例 

为 了 叙述 和 俐 便 起 见 ， 这 里 只 涉及 一 小 部 分 伽 单 的 规则 ， 现 实 中 的 规则 其 实 复 杂 得 多 。 

OQ 客户 cjpase 在 .JPN 市 场 履 行 的 对 zz 的 交易 内 部 结算 到 本 行 账户 ac-345。 

Q 客 户 cjpase 在 .JPN 市 场 履 行 的 交 多 内 部 结算 到 本 行 账户 a-723。 

O 客户 117 在 CS 市 场 履行 的 交易 外 部 绪 算 到 C1T7 账 户 a-345。 

O 客户 chase 对 sony 的 交易 内 部 结算 到 本 行 账户 n-234。 

口 客户 chase 发 生 目 账户 ch-123 的 交易 内 部 结算 到 本 行 账户 n-675。 

O 中 介 icici 在 JPN 市 场 履行 的 交易 ， 证 券 内 部 存 管 到 本 行 账户 ws-1723， 现 金 外 部 结算 到 BOJ 
账户 bp-954。( 这 条 规则 对 现金 和 证 券 分 别 指 定 了 不 同 的 SSI) 

我 们 的 实现 依旧 从 文法 开始 。 有 了 8.3 节 运用 Scala 分 析 估 组 合子 设计 DSL 的 经 验 ， 代 人 码 清 单 

8-7 的 文法 定义 一 点 也 难 不 倒 我 们 。 





8.4. ”定义 文法 


完整 的 文法 定义 会 比较 长 ,不 过 至 少 大 部 分 是 我 们 兄 悉 的 写法 。 因 此 本 节 不 再 从 头 到 尾 讲解 ， 
而 是 聚焦 到 其 中 几 个 特殊 之 处 。 代 码 清单 8-7 给 出 了 完整 的 文法 定义 。 


代码 清单 8-7 ssI_Ds1 的 文法 规则 


package trading.dsl 








import scala.util.parsing.combinator... 
object SSI Dsl extends JavaTokenParsers 
with PackratParsers { <l 声明 使 用 packratParsers 


lazy val standing rules = (standing rule +) 


lazy val standing rule - 


"settle" ~> "trades" ~> trade type spec ~ settlement spec 
lazy val trade type spec - 
trade type spec - ("in" -» market «- "market") | P 左 递归 和 依 序 选择 
trade type spec ~ ("of" ~> security) | 
trade type spec - ("on" -» "account" -» account) | 
"for" ~> counterparty spec 


lazy val counterparty spec - 
"customer" ~> customer | "broker" -» broker 


lazy val settlement spec - 
settle all spec | settle cash security separate spec 


lazy val settle all spec = settle mode spec 





lazy val settle cash security separate spec - 
repN(2, settle cash security - settle mode spec) 


lazy val settle cash security - 
"Safekeep" ~> "security" | "settle" ~> "cash" 


lazy val settle_mode_spec = 
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settle external spec | settle internal spec 


lazy val settle external spec - 
"externally" ~> "at" ~> bank ~ account 


lazy val settle internal spec - 


"internally" ~> "with" ~> "us" ~> "at" ~> account 
lazy val market = not (keyword) ~> stringLiteral 
lazy val security = not(keyword) -» stringLiteral 
lazy val customer - not(keyword) -» stringLiteral 
lazy val broker = not (keyword) ~> stringLiteral 
lazy val account - not(keyword) -» stringLiteral 
lazy val bank = not(keyword) -» stringLiteral 


lazy val keyword - 


"at' | "us" | "of' | "on" | "in" | "and" | "with" EE E 


"internally" | "externally" | "safekeep" | 
"Security" | "settle" | "cash" | "trades" | 
"account" | "customer" | "broker" | "market" 


) 

Max Bron, IR BE IB OE OV IT AA LT: Z JH Sl packrat/] rss 15? 请 注意 针对 traae_- 
type_spec 的 规则 人 @@, 没 错 ， 这 个 地 方 出 现 了 左 递归 和 依 序 选择 ， 如 我 们 所 知 ， 这 恰好 是 packrat 
分 析 需 擅长 处 理 的 情况 。Packrat 分 析 融 因为 特别 采用 了 记忆 技术 〈 见 8.2.3 节 )， 能 将 左 递归 文法 
的 分 析 复 杂 度 从 指数 时 间 降 低 为 线性 时 间 。 

在 Scala 语 言 里 实现 一 个 packrat 分 析 融 ， 你 需要 做 几 件 事情 ， 请 看 表 8-4。 


表 8-4 ”在 Scala 语 言 里 把 分 析 器 变 成 packrat 分 析 器 的 步骤 








步 又 说 。 HH 
(1) 混入 PackratParsers 代码 清单 8-7 的 SSI 分 析 带 执行 以 下 操作 : 


object SSI Dsl extends JavaTokenParsers with PackratParsers { 
(2) 给 出 Reader[Elem] 的 具体 类 型 , Scala 的 packrat 分 析 需 实现 依赖 于 一 个 特 化 的 Reader 实 现 , 即 Packrat- Reader. 
作为 对 分 析 需 处 理 的 输入 类 型 ” 其 定义 为 : 
Input 的 定义 class PackratReader [+T] (underlying: Reader[T]) extends Reader[T] { 
PackratReader 对 内 部 的 Reader 进 行 包装 , 在 其 上 实现 记忆 特性 。 由 于 我 们 继 
"AY JavaTokenParsers, Reader 所 读 入 的 元 素 类 型 已 被 定义 为 Char 











(3) 显 式 指定 返回 类 型 为 不 必 把 所 有 的 分 析 需 都 变 成 packrat 分 析 咒 。 对 于 那些 需要 记忆 特性 来 帮助 处 理 
PackratParser[...] 回 湖 和 左 递归 的 分 析 需 ， 显 式 声 明 其 返回 类 型 为 PackratParser。 我 们 将 在 实 


现 语 义 模型 时 见 到 这 样 的 例子 





除了 上 面 提 到 的 地 方 ，SSIL_DSL 的 文法 定义 大 体 类 似 于 我 们 曾经 实现 过 的 交易 指令 处 理 
DSL。 实 现 好 的 分 析 融 还 要 有 驱动 程序 才能 真正 运转 起 来 ， 作 为 一 个 简单 而 实用 的 练习 ， 读 者 可 
以 笑 试 编写 一 个 驱动 程序 来 调用 分 析 带 并 运行 本 市 出 现 的 一 些 DSL 脚 本 。 

接 下 来 ， 我 们 讨论 如 何 为 SSI 的 领域 抽象 建立 语义 模型 。 
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8.4.8 ”设计 语义 模型 


我 们 设计 的 领域 抽象 要 像 8.3.4 广 的 例子 ， 能够 年 接 通过 函数 施用 组 合子 插入 到 文法 规则 之 
中 。 代 表 整 个 问题 域 的 抽象 被 命名 为 SSI_AST， 因 为 我 们 希望 分 析 DSL 脚 本 的 时 候 就 能 够 按照 这 
个 样子 生成 AST。 完 整 的 语义 模型 请 看 代码 清单 8-8。 


代码 清单 8-8 ”SSI DSL 的 语义 模型 ( 即 AST ) 
package trading.dsl 


object SSI AST { 

type Market - String 

type Security - String 
type CustomerCode = String 
type BrokerCode - String 
type AccountNo - String 
type Bank - String 


trait SettlementModeRule 

case class SettleInternal(accountNo: AccountNo) 
extends SettlementModeRule 

case class SettleExternal(bank: Bank, accountNo: AccountNo) 
extends SettlementModeRule 


trait SettleCashSecurityRule 
case object SettleCash extends SettleCashSecurityRule 
case object SettleSecurity extends SettleCashSecurityRule 


trait SettlementRule 
case class SettleCashSecuritySeparate( 
set: List[(SettleCashSecurityRule, SettlementModeRule)]1]) 
extends SettlementRule 
case class SettleAll(sm: SettlementModeRule) extends SettlementRule 


trait CounterpartyRule 
case class Customer (code: CustomerCode) extends CounterpartyRule 
case class Broker(code: BrokerCode) extends CounterpartyRule 


case class TradeTypeRule(cpt: CounterpartyRule, 
mkt: Option[Market], sec: Option[Security], 
tradingAccount: Option[AccountNo]) 


case class StandingRule(ttr: TradeTypeRule, 
str: SettlementRule) 


case class StandingRules(rules: List[StandingRule]) 


3X BtScalaf V3 f8] P5 T8 , 并 不 需要 额外 的 解释 。 只 是 下 一 段 代码 通过 函数 施用 组 合子 来 处 理 
分 析 结 果 时 ， 要 用 到 这 些 类 ， 因 此 把 它们 列 在 这 里 便于 参照 。 

在 完整 的 文法 定义 里 穿插 处 理 AST 的 组 合 于 ， 就 得 到 代码 浓 单 8-9。 这 上段 代码 最 后 生成 的 数 
据 结 构 standingRules 就 是 我 们 的 语义 模型 。 
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代码 清单 8-9 ”能 生成 语义 模型 的 完整 DSL 实 现 
object SSI Dsl extends JavaTokenParsers 


with PackratParsers { 
导入 AST 
import SSI AST. 


lazy val standing rules: Parser[StandingRules] - 
(standing rule +) ^^ StandingRules 


lazy val standing rule: Parser[StandingRule] - 


"settle" ~> "trades" ~> trade type spec ~ settlement spec 
^^ { case (t ~ s) => StandingRule(t, s) } 
lazy val trade type spec: PackratParser[TradeTypeRule] - 
trade type spec - ("in" -» market «- "market") P 返回 类 型 为 
^^ ( case (t ~ m) => t.copy(mkt = Some(m)) ) | es 
trade type spec ~ ("of" ~> security) 
^^ ( case (t ~ s) => t.copy(sec = Some(s)) } | 
trade type spec ~ ("on" ~> "account" ~> account) 
^^ { case (t ~ a) => t.copy(tradingAccount = Some(a)) ) | 
"for" ~> counterparty spec 


^^ ( case c => TradeTypeRule(c, None, None, None) } 


lazy val counterparty spec: Parser[CounterpartyRule] - 
"customer" ~> customer ^^ Customer | 
"broker" ~> broker ^^ Broker 


lazy val settlement spec - 
settle all spec | 
settle cash security separate spec 


lazy val settle all spec: Parser[SettlementRule] - 
settle mode spec ^^ SettleAIll 


lazy val settle cash security separate spec: Parser[SettlementRule] - 
repN(2, settle cash security - settle mode spec) ( case 1: Seq[. ] => 
SettleCashSecuritySeparate(l map (e => (e. 1, e. 2))) } 


^M 


lazy val settle cash security: Parser[SettleCashSecurityRule] - 
"Safekeep" ~> "security" ^^^ SettleSecurity | 
"Settle" ~> "cash" ^^^ SettleCash 


lazy val settle mode spec: Parser[SettlementModeRule] - 
settle external spec | 
settle internal spec 


lazy val settle external spec: Parser[SettlementModeRule] - 
"externally" ~> "at" ~> bank ~ account 
^^ ( case b ~ a => SettleExternal(b, a) } 


lazy val settle internal spec: Parser[SettlementModeRule] - 
"internally" ~> "with" ~> "us" ~> "at" ~> account ^^ SettleInternal 


l a 3 余下 部 分 与 代码 清单 8-6 相 同 


对 于 出 现 左 递 POA trade_ type_specH MO, 我 们 设置 其 返回 类 型 为 PackratParser 
[TradeTypeRule] 这 样 它 对 备 选项 作 回 渊 分 析 的 时 候 将 会 用 上 记忆 技术 ， 左 递 弟 归 的 问题 也 会 
按照 8.2.3 节 的 优化 方式 得 到 解决 
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很 有 成 就 感 吧 ?” 一 个 完整 的 DSL 连 同 它 的 领域 模型 一 起 深 涡 地 呈现 在 我 们 面前 了 。 文法 看 上 
去 生动 到 位 ，standingRules 抽 象 也 准确 地 表达 了 领域 实体 的 模样 。 所 有 的 分 析 带 经 过 函数 施 
用 组 合子 的 沟通 串联 ， 按 照 各 目的 层级 、 先 后 ， 协 力 建立 起 领域 模型 。 

我 们 知道 , 分 析 右 组 合子 的 关键 是 函数 式 编程 ， 而 组 合子 施 式 的 扩展 性 也 同样 源 日 消 数 之 间 
的 组 合 。 下 一 节 我 们 将 看 到 Scala 分 析 器 对 扩展 DSL 的 贡献 。 


8.4.4 通过 分 析 器 的 组 合 来 扩展 DSL 语 义 


我 们 在 8.2 节 讲解 过 ， 分 析 需 可 以 定义 成 接受 输入 并 产 出 分 析 结 果 的 纯 函 数 。 在 Scala 库 里 ， 
我 们 把 这 样 的 定义 表达 为 (Input => ParseResult[IT]) 。 而 组 合子 是 以 顺序 、 蔡 代 、 重 复 等 
方式 对 分 析 需 进行 组 合 的 高 阶 另 数 。 那 么 ， 分 析 需 和 分 析 绪 果 之 间 是 怎样 组 合 的 呢 ? 

1. 以 Monad 方 式 实现 定制 扩展 

如 条 我 们 翻 看 Scala 分 析 需 组 合子 库 的 源 代 但 ,就 会 发 现 ParseResult [T] HMParser [+T] #6 
是 Monad 化 的 结构 。 换 言 之 ,它们 都 实现 了 标准 的 map、flatMap 和 append 方 法 ， 而 这 几 个 方法 
对 于 实现 单个 的 组 合子 有 很 大 的 帮助 ,可 以 免 去 组 合 分 析 避 时 显 式 串 接 输 入 的 麻烦 。 我 们 在 对 代 
码 清 单 8-3 的 顺序 组 合子 实现 进行 改造 时 已 经 体会 过 它们 的 作用 ，Monad 化 的 Parser 和 
ParseResult 配 合 for-comprehension 产 生 了 徘 常 精炼 的 顺序 组 合子 实现 。 

如 果 能 在 分 析 需 的 基本 抽象 上 附加 一 层 组 合 语义 , 那么 规则 的 编排 将 具有 很 强 的 灵活 性 。 我 
们 可 以 串联 组 合子 , 可 以 目 定 义 任意 的 变换 函数 去 变换 分 析 结 果 , 还 可 以 在 已 有 的 分 析 硕 上 添加 
额外 的 语义 。 举 个 例子 ， 我 们 可 能 希望 在 交易 指令 处 理 DSL 的 某 个 分 析 右 里 记录 下 分 析 的 过 程 。 
那么 利用 针对 Parser 抽 象 定义 的 1og 组 合子 ， 我 们 很 容易 就 能 做 到 : 

lazy val line item: Parser[LineItem] = 


log(security spec ~ buy sell ~ price spec ^^ { case s ~ b ~ p => 
Lineltem(s, b, p) J)("line item") 


log% H Parsers RPE, "E SCHR EIDEM ARA APTE s, PILATEATPESEAA T Bn dc. 
录 信 息 。 更 详细 的 情况 请 参看 Scala 源 代码 。 

2. 把 分 析 器 设计 成 装饰 器 

我 们 在 代码 清单 8-6 里 ,利用 偏 阴 数 施用 组 合子 ， 在 分 析 厅 里 添 加 了 仪 在 特定 上 下 文 内 生效 
的 验证 功能 。 但 如 果 想 在 分 析 过 程 中 加 入 更 丰富 的 语义 , 我 们 可 以 把 分 析 融 设计 成 疹 饰 妨 一 个 分 
析 盘 的 形式 。 请 看 代码 消 竺 8-10。 


代码 清单 8-10 ”一 个 市 验证 功能 的 分 析 和 着 ， 在 分 析 硕 上 加 入 了 领域 语义 
trait ValidatingParser extends Parsers í( 
def validate[T](p: => Parser[T])( 
validation: (T, Input) => ParseResult[T]): Parser[T] = Parser ( 

















in => pn) match { 
case Success (x, in) => validation (x, in) 
case fail => fail 
j 
) 
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ValidatingParser 对 一 个 已 有 的 分 析 骨 进行 了 包 闭 ， 可 在 其 上 沃 加 任意 的 领域 语义 。 
validqate 方 法 的 参数 validation 是 一 个 财 包 ,如 果 我 们 的 DSL 需 要 增加 某 些 专门 的 领域 语义 的 
话 ， 可 以 放 在 闭 包 里 。 稍 后 我 们 会 在 ssT_Dps1 分 析 器 ( 见 代码 清单 8-7 ) 上 演示 这 种 手法 。 

不 知道 你 还 是 否 记 得 ， 本 章 前 面 的 插入 栏 里 提 到 过 ， 一 条 SSI 可 以 分 别 对 现金 和 证 券 的 结 
作出 不 同 的 指示 。 我 们 在 代码 清单 8-9 中 将 这 种 情况 建 模 为 下 面 的 分 析 带 : 

lazy val settle cash security separate spec: Parser[SettlementRule] = 


repN(2, settle cash security ~ settle mode spec) ^^ ( case l: Seq[ ] => 
SettleCashSecuritySeparate(l map (e => (e. 1, e. 2))) } 


分 Er f&TAÁ 1/5 得 到 Es SettlementRul eiit P4 , 该 case 类 在 我 1 `] 的 js 义 模 型 里 是 这 样 定 义 的 : 


case class SettleCashSecuritySeparate( 
set: List[(SettleCashSecurityRule, SettlementModeRule)]) 
extends SettlementRule 


3X A LU] BIS] rr is e wr AE AA FUR SIL HH ARTER, AX MOHIbrepN(2, ..) EMT, 
但 仅仅 这 样 还 不 能 证 明 规 则 有 效 , 我 们 还 必须 确定 ， 其 中 一 段 是 对 证 养 结 算 的 指示 ， 另 一 段 是 对 
现金 结算 的 指示 。 那 么 ， 应 该 怎么 做 呢 ? 

3. 接 入 装饰 器 

其 中 一 种 办 法 是 接 入 刚才 实现 的 ValiqdatingParser， 通 过 它 来 执行 检验 SSI 规 则 有 效 性 的 
领域 验证 逻辑 。 下 面 的 代码 清单 对 相关 文法 规则 实施 了 改造 。 


代码 清单 8-11 以 装饰 妖 形 式 实现 的 ValidatingpParser 


lazy val settle cash security separate spec: Parser[SettlementRule] = 











validate( 
repN(2, settle cash security - settle mode spec) 
^^ ( case 1: Seq[. ] => 
SettleCashSecuritySeparate(l map (e => (e. 1, e. 2))) } 
) (case (s, in) => ( 
if ((s hasSettleSecurity) && (s hasSettleCash)) E 验证 通过 
Success(s, in) 
else Failure( 
"should contain 1 entry for cash and P 验证 失败 
Security side of settlement", in) 


J 
} 


如 果 验 证 前 的 分 析 结 果 为 Success， 且 得 到 的 List 内 含有 一 个 SettleSecurity 和 和 一 个 
SettleCash 对 和 象 ， 那么 我 们 返回 success 作 为 验证 后 的 最 终结 果 @:; 否则 因为 没 能 通过 领域 验 
证 而 将 原来 的 成 功 结果 改 为 Failure@, 当然 , 为 了 让 valiqatingParser 对 我 们 的 文法 规则 起 
作用 ， 还 要 将 它 混和 人 到 原先 的 SsT_Ds1 分 析 需 中 


object SSI Dsl extends JavaTokenParsers 
with PackratParsers 
with ValidatingParser { 








£4 s 
这 种 将 多 个 分 析 需 组 合 的 手法 是 Decorator 设 计 模 式 的 一 种 应 用 。 这样 的 设计 可 以 保持 基本 抽 
象 (也 就 是 例子 里 的 核心 分 析 需 ) 不 受 侵 染 ， 同 时 又 能 随时 根据 需要 插 人 额外 的 领域 逻辑 。 
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8.5 ”小结 


如 果 一 路 坚持 学 习 分 析 器 组 合子 , 那么 到 本 章 结 尾 这 里 , 你 已 经 对 这 种 函数 式 编程 在 语言 设 
计 领 域 的 高 级 应 用 有 了 相当 程度 的 了 解 。 分 析 需 组 合子 可 以 说 是 最 为 简洁 的 一 种 外 部 DSL 设 计 手 
段 。 我 们 不 需要 为 了 实现 DSL 而 自行 设计 一 套 语言 基础 设施 。 分 析 各 组 合子 技术 给 我 们 提供 一 种 
内 部 DSL 来 作为 设计 外 部 DSL 的 手段 。 我 们 可 以 一 边 在 模块 化 、 异 常 处 理 等 基本 服务 上 借用 宿主 
语言 的 基础 设施 ， 一 边 为 用 户 设 计 全 新 的 语言 。 





要 点 与 最 佳 实践 
OQ 分析 器 组 合子 在 宿主 语言 的 语法 范围 内 提供 了 一 种 函数 式 色 彩 浓厚 的 外 部 DSL 设 计 手 段 。 
口 用 分 析 器 组 合子 设计 出 来 的 外 部 DSL 往往 拥有 非常 精炼 的 实现 ,因为 中 组 表示 法 和 类 型 
推断 特性 令 组 合子 形成 一 种 说 明 式 的 语法 。 
O 使 用 语言 提供 的 分 析 器 组 合子 库 ， 首 先 要 留意 库 中 是 否 提供 了 记忆 分 析 器 、packrat 
分 析 器 之 类 的 特殊 礼物 。 只 有 熟练 学 握 库 的 全 部 能 力 ， 我们 才能 为 DSL 设 计 效 率 最 高 的 





本 章 我 们 学 习 了 在 其 核心 语言 的 基础 上 , Scala 如 何以 库 的 形式 实现 分 析 需 组 合子 功能 。 普通 
的 Scala 函 数组 合 在 一 起 ,就 能 让 我 们 用 极为 近似 EBNF 的 表述 形式 来 定义 文法 规则 。Scala 库 提供 
了 非常 丰富 的 组 合子 供 我 们 处 理 语 义 模 型 ， 并 从 分 析 过 程 中 产生 定制 的 AST。 最 后 ， 我们 讨论 了 
可 以 在 普通 自 顶 问 下 递归 下 降 分 析 磊 无 能 为 力 时 发 挥 作用 的 packrat 分 析 厦 。 此 外 我 们 还 通过 一 个 
Scala 实 现 示例 的 演练 ， 真 切 体验 到 packrat 分 析 玫 的 高 效率 实现 。 
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第 9 革 侧 短 探 讨 我 们 在 基于 DSL BJJFA HFOULER BUB — ERRER. ERG A Ee DULCE f P 
越 来 越 广汉 ， 因 为 国 数 二 抽象 的 组 合 能 力 相 对 优 于 OO 抽象 。 我 认为 大 量 的 DSL 技术 发 展 将 在 
国 数 云 编 程 的 世界 里 蔡 本 成熟 。 当 开发 者 真正 认识 到 语法 分 析 伦 组 合子 等 技术 的 威力 所 在 ， 一 
定 会 有 更 多 人 被 吸引 过 来 。DSL 语言 工作 台 因 为 其 完整 的 开发 和 维护 能 力 ， 也 将 获得 广阔 的 前 
景 。 本 部 分 还 将 讨论 DSL 版 本 维护 的 重要 话题 ， 借 鉴 书 中 的 一 些 实践 ， 你 可 以 帮助 用 户 平 稳 度 
过 DSL 语法 省 变 的 考验 。 总 之 ， 揭 示 DSL 世界 中 的 种 种 发 展 趋势 ， 正 古本 书 第 三 部 分 即 第 9 
TERME — EE. 





望 DSL 讽 计 的 未 来 





本 章 内 容 

口 回顾 本 书 的 全 部 旅程 

O DSL 开 发 正 获 得 越 来 越 广 泛 的 支持 
O 编写 DSL 的 工具 越 来 越 完 善 

Q DSL 还 在 继续 向 前 演化 














MER! 这 里 已 经 是 本 书 的 最 后 一 革 了 。 我们 讨论 着 各 种 基于 DSL 的 开发 范式 ,不 党 走 过 了 
长 长 的 旅程 。 我 们 为 了 全 方位 地 探讨 DSL 设 计 而 使 用 了 好 几 种 语言 ,其 中 大 部 分 是 JVM 语 言 。 这 
些 语 言 都 是 精心 挑选 的 , 兼顾 了 前 态 类 型 和 动态 类 型 语言 ， 面 丫 对 和 象 编程 和 也 数 式 编程 。 本 间 我 
们 将 考察 DSL 开 发 领域 一 些 正在 被 更 多 人 认同 ， 有 可 能 成 为 主流 趋势 的 技术 。 我 们 作为 DSL 开 发 
的 实践 者 ， 需 要 留意 这 些 新 动 问 ， 其 中 有 一 些 也 许 会 成 长 为 实用 的 开发 扩 术 。 

DSL 的 开发 中 有 几 个 领域 的 发 展 吸引 了 DSL 设 计 者 们 的 关注 , 很 值得 我 们 讨论 。 图 9-1 是 本 章 
的 路 线 图 ， 我 们 将 在 旅途 的 最 后 一 程 中 学 习 这 些 特 性 。 

语言 层面 的 支持 越 来 越 充分 
e 元 编程 


e S 表 达 式 
e 分 析 强 组 合子 


























其 他 方面 的 工具 支持 





DSL 工 作 台 DSL 的 发 展 和 演变 
图 9-1 本 章 路 线 图 


本 章 的 讨论 从 9.1 市 的 语言 表现 力 说 起 ， 这 个 领域 的 发 展 日 新 月 异 。Groovy、Ruby、Scala、 
Clojure 语 言 的 表现 力 都 远 远 超越 了 Java, 而 有 旦 还 在 注重 与 使 用 者 交流 的 前 提 下 ,不断 地 疝 前 发 展 。 
在 这 些 语 言 当 中 ，Groovy、Ruby、Clojure 等 动态 语言 已 经 文 持 强大 的 元 编程 ， 甚 至 连 有 的 静态 
类 型 语言 也 添加 了 元 编程 能 力 。 即使 我 们 没有 马上 专注 于 元 编程 , IH DSLJTA A R Mp Rn 
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也 应 该 时 时 关注 这 方面 的 进展 , 知道 各 种 元 编程 特性 正在 改变 着 当今 的 编程 语言 , 正在 创造 一 个 
更 适合 建设 DSL 的 环境 。 

分 析 需 组 合子 是 DSL 实 现 技 术 的 一 个 进步 。 具 备 困 数 式 编程 能 力 的 语言 将 会 越 来 越 多 地 把 分 
析 需 组 合子 库 当 成 语言 的 标准 配备 。 分 析 需 组 合子 也 是 9.1 节 的 话题 之 一 。 

接着 我 们 要 说 到 DSL 工 作 台 , 这 种 开发 方式 有 可 能 成 为 今后 DSL 开 发 的 常态 。9.3 市 介绍 现代 
IDE 提 供 的 其 他 辅助 工具 支持 。 最 后 一 节 我 们 探讨 DSL 的 演进 ， 学 习 怎 样 有 计划 地 安排 DSL 的 成 
长 步调 ,谨慎 维护 语言 的 向 后 兼容 。 

如 果 说 前 面 的 章节 谈 的 是 DSL 设 计 的 现状 ,那么 这 一 章 勾 画 的 是 DSL 的 未 来 。 我 们 要 为 明天 
做 好 准备 ， 因 为 明天 马上 就 会 到 来 。 
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DSEL 的 意义 在 于 它 描述 建 模 领域 的 表达 能 力 。 假 如 我 们 对 一 个 会 计 系统 建 模 ， 必 然 希 望 API 
在 交流 中 使 用 借方 、 贷 方 、 会 计 账 面 、 分 类 帐 、 日 记 帐 这 样 的 专业 语汇 。 这 些 术语 构成 了 模型 中 
的 名 词 实体 ,承载 着 问题 域 的 一 部 分 核心 概念 。 除 了 和 名词， 问题 域 中 还 有 动词 ， 同 样 需要 我 们 用 
相同 的 表现 力 水 平 表达 出 来 。 还 记得 第 1 草 那 个 作为 引子 的 咖啡 店 的 例子 吗 ? 店员 之 所 以 能 准确 
无 误 地 送 上 我 们 的 点 单 , 是 因为 我 们 说 的 是 她 能 理解 的 语言 。 表 达 的 方方面面 都 要 与 建 模 的 问题 
域 形成 共鸣 。 请 回顾 一 下 第 3 章 的 这 段 Scala 代 码 : 

withAccount(trade) { 

account => 1 


settle( 
trade using 


























account.getClient 


.getStandingRules 
.filter( .accounb == account) 
.first) 


andThen journalize 
j 
j 


这 里 的 DSL 来 自 证 券 交 易 系 统 。 可 以 看 出 ，DSL 语 法 很 好 地 仿效 了 该 领域 里 的 名 词 和 动词 。 
Scala 文 持 局 阶 函数 ， 因 此 我 们 可 以 对 领域 行为 (动词 ) 和 领域 对 象 (名 词 ) 一 视 同仁 ， 用 相同 的 
方式 来 建 模 。 这 种 建 模 手段 上 的 统一 对 语言 表现 力 有 正面 的 影响 。 

读者 也 许 会 疑惑 我 为 什么 到 了 最 后 一 草 , 还 要 把 “表现 力 ” 这 个 已 经 吐 穿 全 书 进行 讨论 的 主 
局 ,又 重新 强调 一 损 。 我 认为 有 必要 香 提 这 么 一 个 事实 : 对 于 一 种 能 力 充分 的 语言 来 说 ， 限 制 其 
表现 力 的 只 有 使 用 者 的 创造 力 而 已 。 只 要 善 用 元 编程 、 函 数 式 控制 结构 等 方面 的 惯用 法 ,再 加 上 
一 个 足够 灵活 的 类 型 系统 , 足以 让 程序 员 用 领域 本 身 的 语言 来 摘 述 领域 问题 。 本 克 我 们 将 讨论 当 
前 的 一 些 语言 如 何 拓 展 其 表现 力 ， 从 而 成 为 DSL 开 发 的 中 坚 力量 的 。 


9.1.1. ”对 表现 力 的 不 懈 追 来 



































在 这 个 诸多 新 语言 争 相 党 相 的 时 代 , 我 们 看 到 , 语言 给 我 们 提供 了 越 来 越 充分 的 支持 去 实现 9 
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丰富 多 彩 的 DSL 语 法 设计 。 本 书 用 了 很 多 草 的 篇 幅 来 讨论 其 中 的 Ruby、Groovy、Scala 和 Clojure 
语言 ， 详 细 介 绍 了 它们 的 设计 能 力 。 本 区 我 们 打算 简要 介绍 其 他 一 些 声言 的 概况 。 这 样 做 的 主要 
目的 不 是 为 了 探讨 语言 细 广 , 而 是 为 了 让 你 感受 现在 正在 发 生 的 , 众多 语言 为 了 提高 目 身 与 人 区 
流 的 能 力 而 付出 的 不 懈 努 力 。 从 图 9-2 可 以 看 出 一 些 主流 语言 的 演变 脉络 ， 它 们 随 着 时 间 推 演 ， 
进化 成 了 为 一 种 表现 力 更 高 的 语言 。 

表现 力 水 平 




















。 更 强 的 抽象 能 
。 垃 圾 收集 


C_ wwc_ > Jaa  ———————»  Groovy/Ruby/ 


Scala/Clojure 


更 好 的 抽象 能 s 
。 函 数 式 编程 
。 表 达能 力 出 色 的 语法 
。 多 样 化 的 控制 结构 


图 9-2 ”编程 语言 的 表现 力 演进 过 程 


表现 力 充 沛 的 编程 语言 可 以 帮助 弥合 问题 域 与 解 管 域 之 间 的 鸿沟 ,在 不 支持 高 阶 函 数 的 OO 语言 
E, 我 们 只 好 把 对 象 强 扭 成 函数 子 ( functor ), 才 得 以 对 领域 动作 建 模 。 显然 这 样 的 间接 手段 会 下 接 
地 反映 在 DSL 设 计 结 果 上 , 造成 非 本 质 复杂 性 ( 对 非 本 质 复 杂 性 的 解释 见 附录 A )。 当 函数 不 再 是 次 
一 等 的 抽象 手段 时 ，DSL 将 去 除 那些 由 间接 而 产生 的 干扰 成 分 ， 变 得 更 干 靖 ， 更 容易 被 客户 接 爱 。 

这 些 年 里 ， 由 于 编程 语言 表现 力 的 提高 ，DSL 开 发 实践 也 随 之 发 生 了 变化 。 即 使 在 C 语 言 流 
行 的 年 代 ,我 们 也 一 样 做 春 编写 领域 规则 的 工作 , 只 不 过 当时 要 在 一 个 低 得 多 的 抽象 层次 上 操作 。 
图 9-3 列 举 了 这 方面 的 进步 。 





























。 模块 化 的 代码 。 更 好 的 抽象 

。 通过 类 型 别名 赋予 有 意义 的 命名 e. 较 纯粹 的 面向 对 象 
e KA e. 较 低 的 非 本 质 复杂 性 
eZ. (简陋 ) 






Groovy, Ruby, Scala, Clojure 


C 
。 更 好 的 抽象 
。 简 陋 的 元 编程 能 。 更 好 的 抽象 
。 面 向 对 象 编程 能 力 o 





。 面 向 对 象 及 函数 式 编程 能 
。 更 简洁 、 更 有 表现 力 的 语法 
。 分 析 器 组 合子 


图 9-3 ”用 于 DSL 开 发 的 编程 语言 一 直 在 演进 着 ,语言 特 性 有 了 很 大 的 进步 
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图 中 很 多 语言 特性 已 经 处 于 成 熟 阶 段 ， 但 也 有 一 些 正 处 于 争取 被 更 多 语言 采纳 的 发 展 阶段 。 
下 面 的 三 市 将 详 述 其 中 三 种 逐渐 在 DSL 开 发 生态 中 占据 一 席 之 地 的 重要 特性 ,第 一 种 是 已 经 在 动 
态 寺 言 中 普及 的 元 编程 。 由 于 元 编程 在 DSL 设 计 方 面 的 潜力 , 在 众多 加 入 元 编程 机 制 的 语言 当中 ， 
甚至 有 一 些 属于 静态 类 型 语言 。 


9.1.2 元 编程 的 能 力 越 来 越 强 


观察 最 近 发 展 起 来 的 语言 ， 我 们 可 以 发 现 它们 的 元 编程 能 力 在 不 断 提 高 。Ruby 和 Groovy 提 
供 运行 时 元 编程 ， 这 在 第 2 章 、 第 3 章 、 第 4 章 、 第 $ 章 已 经 有 很 大 篇 幅 的 论述 ; JVM 上 的 Lisp 语 言 
变种 Clojure 提 供 的 编译 时 元 编程 , 可 以 设计 出 表现 力 充沛 的 DSL, 又 完全 没有 运行 时 的 性 能 负担 。 
要 想 在 DSL 上 有 所 建树 ， 必 须 精 通 手头 语言 的 元 编程 技术 。 

静态 类 型 语言 Haskell ( 459.65 X BA[10] ) 和 Ocaml ( 见 9.6 闻 文献 [11] ) 已 经 着 手 将 元 编程 融 
和信 到 语言 的 基础 设施 。Template Haskell 是 Haskell 语 言 的 扩展 , 它 在 语言 中 增加 了 编译 时 元 编程 设 
施 。 传 统 上 用 Haskell 语 言 设计 DSL 时 ， 一 般 会 采用 内 部 DSL 的 实现 方式 。 开 发 者 希望 的 写法 和 
Haskell 人 允许 的 写法 之 间 往 往 不 一 致 。 而 在 编译 时 元 编程 技术 下 ,我们 可 以 按 实际 需要 去 设计 语法 ， 
由 语言 设施 将 之 转换 为 适当 的 Haskell AST 结 构 ， 其 机 制 类 似 于 Lisp 的 宏 。 

众多 语言 大 力 发 展 元 编程 技术 ， 直 接 证 明 DSL 正 在 成 为 主流 。 下 一 节 我 们 讲述 $ 表 达 式 的 特 
性 ， 它 有 淤 力 在 大 多 数 时 候 取代 XML 充当 数据 载体 。 


9.1.3. S 表 达 式 取代 XML 充当 载体 


有 些 表 达 形 式 灵 活 的 语言 ， 如 Clojure (或 Lisp )， 提 供 了 S 表 达 式 ( s-expression ) 特性 ， 可 以 
用 代码 来 表示 数据 。 现在 的 企业 系统 经 常 大 量 使 用 XML 来 描述 配置 数据 , 并 和 冠 以 DSL 数 据 建 模 的 
名 头 。 应 用 中 的 XML 结构 经 过 适当 工具 的 后 续 解 析 和 处 理 ， 能 生成 可 直接 被 程序 使 用 的 产物 。 
这 种 设计 除了 XML 难以 阅读 的 问题 之 外 ， 表 达 高 阶 结构 如 条 件 结构 的 能 力也 有 从 缺 ， 充 其 量 只 
是 S 表 达 式 的 拙劣 蔡 代 品 。 

我 曾经 做 过 一 个 项 目 , 项 目 中 通过 XML 消息 来 在 多 处 部 署 之 间 传 输 实 体 。 例如 一 个 Account 
对 象 可 以 表示 为 下 面 的 XML 请 段 : 

«account» 


«no»a-123«/no» 
«name» 















































«primary»John P.«/primary» 
«secondary»Hughes R.«/secondary» 
«/name» 
«dateOfOpening»20101212«/dateOfOpening» 
«status»active«/status» 
«/account» 


XML 格式 的 消息 要 先 经 过 解析 ， 转 换 成 合适 的 数据 结构 后 才能 供 程序 使 用 。 我 们 不 妨 试 试 
Clojure 提 供 的 S 表 达 式 ， 这 样 代码 一 下 子 束 能 变 得 清楚 而 简洁 : 
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(def account 


{no 123, 

name {primary "John P." secondary "Hughes R."}, 
date-of-opening "20101212", 

status ::active }) 





与 等 价 的 XML 相 比 , 新 的 族 段 不 但 声 法 精简 , TR XCULSB EISE, 而且 是 一 个 可 以 执行 的 Clojure 
数据 模型 。 我 们 不 需要 筹划 和 额外 的 机 制 去 解析 它 的 结构 ,也 不 需要 把 它 转 换 成 运行 时 制品 ; 这 个 
模型 自 接 束 能 在 Clojure 运 行 时 中 执行 。 我 戏称 这 种 结构 是 可 执行 的 XML。 从 DSL 的 角度 看 , CA 
但 比 原来 的 XML 版 本 优秀 得 多 ,而且 语 言 定 义 仪 仅 使 用 了 编程 语言 本 号 的 特性 。 今 后 随 着 基于 
DSL 的 开发 日 益 成 熟 ， 这 种 数据 即 代码 的 范式 也 会 用 得 越 来 越 普 过 。 

越 来 越 普 届 的 还 有 分 析 需 组 合子 ， 这 一 波 趋势 主要 体现 在 函数 式 语 言 当 中 。 我 们 在 第 8 章 见 
识 过 分 析 俘 组 合子 优秀 的 DSL 设 计 能 力 ， 下 面 再 用 一 人 次 次 它 的 发 展 情 况 。 


9.1.4 分 析 器 组 合子 越 来 越 流 行 


我 们 在 第 8 草 学 过 ， 用 分 析 融 组 合子 来 设计 外 部 DSL 时 ， 可 以 不 傅 助 任何 外 部 工具 ， 御 主语 
言 的 一 个 库 就 已 经 能 满足 全 部 要 求 。 随 着 函数 式 编程 的 普及 , 我 们 将 会 看 到 分 析 各 组 合子 库 的 煤 
炸 性 增长 。Gilad Bracha 开 发 中 的 新 语言 Newspeak( 059.6715 RR] ) 拥有 一 个 特别 丰富 的 分 析 需 
组 合子 库 , 比 我 们 用 过 的 Scala 分 析 需 组 合子 能 更 好 地 解 耦 文法 规则 和 语义 模型 。 很 多 现存 语言 如 
F# ( 见 9.6 节 文献 [5] )、JavaScript ( 见 9.6 节 文献 [6] )、Scheme ( 见 9.6 节 文献 [7] )， 也 都 在 发 展 自己 
的 分 析 需 组 合子 库 。 

分 析 需 组 合子 以 一 种 描述 性 的 方式 来 定义 DSL 语 法 ， 外 观 近 似 于 EBNF 规 则 。 虽 然 我 们 用 分 
析 硕 生成 从 也 能 写 出 类 似 EBNF 的 描述 性 文法 规则 ， 但 分 析 冀 组 合子 完全 在 箱 主 语言 的 郊 围 内 运 
作 , 因此 可 以 充分 利用 牡 主语 言 的 其 他 特性 。 香 主语 言 的 文 持 将 帮助 我 们 把 语义 动作 从 文法 定义 
中 解脱 出 来 ， 从 而 获得 结构 清晰 的 DSL 实 现 。 

除了 常见 的 文本 形式 的 DSL，DSL 开 发 还 存在 为 一 个 抽象 层次 更 高 的 方法 流派 ， 就 是 DSL 工 
ER (DSL workbench )。 第 7 章 讨 论 过 的 Xtext 束 是 这 种 DSL 开 发 范式 的 一 个 代表 。 将 来 ，DSL 工 
作 台 很 有 可 能 从 根本 上 改变 我 们 对 DSL 的 认识 。 


















































9.2 DSL 工作 台 


高 屋 建 领地 说 ，DSL 设 计 是 一 种 在 所 处 环境 的 束缚 下 ， 尽 可 能 建立 最 具 表 现 力 的 API 的 一 种 
实践 活动 。 对 于 内 部 DSL， 我 们 受到 笨 主 语言 的 限制 。 对 于 外 部 DSL， 我 们 目 行 设计 的 语法 局 限 
于 我 们 选用 的 分 析 右 生成 右 或 组 合子 。 无 论 哪 种 情况 ,我 们 谈论 的 仍然 是 文本 形式 的 DSL。 AVE 
我 们 提供 给 用 户 什么 样 的 界面 , 它 的 呈现 形式 总 是 一 种 基于 文本 的 结构 。 我们 尽 可 能 为 用 户 改 善 
API 的 表现 力 ， 但 只 要 API 是 用 菏 种 语言 实现 的 ， 用 户 终 究 不 得 不 承担 语言 运行 时 强加 的 规则 和 
限制 。 

近年 出 现 的 另 一 派 思路 不 再 把 基于 文本 的 DSL 开 发 范式 当做 一 件 理 所 当然 的 事情 。 举 个 例 
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来 说 ， 电 子 表格 才 是 最 符合 直觉 的 计算 逻辑 表达 方式 。 而 在 一 个 单纯 以 文本 为 设计 手段 的 DSL 世 
界 里 ， 我 们 绝 无 可 能 跳出 语言 的 梭 梅 ， 组 织 起 像 电子 表格 、 图 标 引 擎 这 样 的 高 阶 结构 。 

Eclipse Xtext(〈 见 第 7 草 ) 等 框 桨 天 厦 这 个 方 问 前 进 了 一 小 步 。 它 用 元 模型 取代 纯 文 本 格式 来 
保存 DSL， 而 元 模型 可 以 被 投射 到 Eclipse 编辑 名 。 编 辑 骨 具备 语法 高 完 、 代 码 补 全 等 功能 。 这 类 
框架 支持 的 抽象 层次 越 高 , 就 越 便于 最 终 用 户 目 己 建立 、 编 辑 和 维护 DSL。 而 协助 最 终 用 户 建立 、 
编辑 和 维护 DSL 的 工具 ， 就 叫做 DSL 工 作 台 。 





























9.2.1 _DSL 工 作 台 的 诛 理 


我 们 曾经 在 第 7 童 用 Eclipse Xtext ( 见 9.6 方 文献 [1] ) 生成 了 一 个 专用 的 DSL 工 作 台 。JetBrains 
Meta-Programming System ( MPS ) ( 见 9.6 节 文献 [2] ) 和 Intentional 出 品 的 Domain Workbench ( Jl 
9.6 XA [3] ) 也 是 同类 的 工具 。 它 们 都 放弃 了 单纯 基于 文本 的 编程 方式 ， 改 用 AST 等 高 阶 结构 
来 作为 基本 的 存储 单元 。 

工作 台 的 使 用 者 不 直接 编写 文本 形式 的 程序 ， 而 是 通过 一 种 特殊 形式 的 IDE， 叫 做 投射 式 编 
辑 器 (projectional editor ) 来 操作 DSL 的 结构 。DSL 工 作 台 通 稼 可 以 和 一 些 工 具 , 如 Microsoft Excel 
TERR, 使 我 们 能 够 调动 这 些 工 具 去 设计 DSL 的 语法 和 语义 。 我 们 在 Excel 里 建立 的 模型 作为 元 
数据 保存 在 工作 台 的 仓库 里 ， 对 应 着 DSL 里 的 高 层次 抽象 。 

如 条 需要 , 我 们 还 可 以 从 工作 台 仓 库 里 保存 的 元 模型 生成 指定 语言 的 代码 。 这 样 的 开发 方式 
不 正 是 领域 用 户 的 梦想 吗 ? 不 正 是 我 们 原本 赋予 DSL 的 价值 诉求 吗 ?” 领 域 工作 台 也 许 将 成 为 领 
域 专 家 和 程序 开发 者 的 理想 交汇 点 。 图 9-4 说 明了 领域 工作 台 对 DSL 实 现 的 全 程 支 持 。 


A 


使 用 工作 台 提 供 
的 投 喘 式 编辑 器 可 被 编辑 、 维 护 
及 版 本 控制 





























领域 专家 使 用 Excel、PowerPoint 
和 其 他 结构 来 设计 模型 可 被 转换 生成 供 执行 的 编 
程 语言 结构 (类似 Java) 
图 9-4 ”DSL 工作 人 台 为 DSL 实 现 的 全 部 生命 期 提供 文 持 。 领 域 专家 打交道 的 对 象 是 像 Microsoft 

Excel 这 样 的 高 层次 结构 。 工 作 台 不 直接 保存 程序 文本 ， 而 是 保存 元 数据 。 元 数据 可 以 
被 投射 到 一 种 智能 的 编辑 天， 叫做 投 英 式 编辑 从 上 。 我 们 通过 这 种 编辑 需 来 编辑 元 数 
据 、 处 理 其 版 本 变迁 以 及 其 他 方面 的 管理 维护 。 工 作 台 还 拥有 生成 编程 语言 ( 如 Java ) 
代码 的 设施 
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在 更 高 的 抽象 层次 上 编程 ， 这 是 本 书 反复 论述 的 一 个 主题 ， 而 且 已 经 成 为 目前 存在 的 几 种 
DSL 工 作 台 的 原则 共识 。 它 们 之 间 的 差别 主要 体现 在 抽象 的 表达 上 。 表 9-1 总 结 了 部 分 工作 人 台 产 
品 在 几 个 方面 的 差别 。 











表 9-1 DSL 工 作 台 产品 的 特性 差异 





特 性 工作 台 产 品 之 间 的 差别 
抽象 语法 的 表达 及 定义 方式 — 抽象 语法 可 以 用 抽象 语法 树 或 者 图 来 表达 ， 也 可 以 定义 成 元 模型 或 文法 描述 形式 
元 模型 的 组 合 很 多 工作 台 都 支持 用 知 干 文法 或 元 模型 组 合 起 来 作为 一 种 抽象 语法 的 表达 载体 
变换 能 力 Xtext 等 工作 台 文 持 基 于 模板 的 代码 变换 ，MPS 本 吴 直 接 文 持 从 模型 到 模型 的 变换 
IDE x f$ 大 多 数 工作 人 台 本 吴 即 具备 完善 的 、 可 定制 的 IDE 文 持 ， 为 DSL 作 者 提供 语法 高 亮 、 


代码 补 全 等 上 下 文 相 关 的 协助 功能 





DSL 工 作 台 绝对 是 一 件 值 得 放 进 包 里 随时 备用 的 好 工具 。 那 么 我 们 就 来 次 说 使 用 DSL 工 作 人 台 
有 哪些 好 处 。 


9.222 使 用 DSL 工 作 台 的 好 处 


不 同 的 工作 台 在 不 同 的 方面 各 有 千秋 ,但 所 有 的 DSL 工 作 台 都 具有 以 下 优点 。 

O 分 离 了 DSL 界 面 的 关注 点 和 DSL 实 现 的 关注 点 。 

a 用 户 可 与 高 层次 结构 直接 互动 。 这 些 结构 比 一 般 文本 型 编程 语言 中 所 见 的 结构 层次 更 高 。 

因此 ， 对 于 没有 编程 背景 的 领域 用 户 来 说 ， 工 作 台 方式 下 的 DSL 开 发 更 有 吸引 力 。 

口 为 DSL 了 驱动 的 开发 方式 全 程 提 供 优 厚 的 环境 。 

OQ 较 容易 完成 多 种 DSL 的 组 合 。 

但 从 发 展 阶段 来 看 ，DSL 工 作 台 还 处 在 婴儿 时 期 。 虽 然 这 项 技术 前 景 很 好 ,， 也 已 经 推广 了 一 
段 时 间 , 但 开发 商 还 需要 解决 好 一 些 问题 才能 让 DSL 工 作 台 成 为 主流 。 其 中 最 主要 的 一 个 问题 是 
“J ADE” (vendor lock-in )。DSL 工 作 人 台 有 以 下 几 个 最 为 重要 的 方面 : 

口 抽象 表示 的 呈现 形式 ; 

OQ fS dH dS ; 

O 代码 后 成 硕 。 

这 几 个 方面 全 都 被 锁定 到 相应 的 框架 上 。 当 我 们 无 法 脱离 一 个 特定 平台 来 建 模 DSL 时 , M 
虚 在 所 难免 ,这 种 锁定 意味 着 为 了 在 项 目 里 实现 DSL ,开发 团队 又 不 得 不 学 习 一 套 专门 的 工具 。 
DSL 工 作 台 即使 有 这 样 的 缺点 , 也 仍然 是 一 种 很 有 吸引 力 的 技术 范式 , 值得 我 们 继续 关注 它 的 
未 来 发 展 。 

除了 寄 望 工作 台 提 供 完 整 的 DSL 开 发 环境 外 ， 我 们 还 寻求 加 强 IDE 对 DSL 开 发 的 工具 文 持 ， 
以 改善 眼下 的 状况 。 
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9.3 ”其 他 方面 的 工具 支持 


如 前 所 述 ，DSL 工 作 台 是 首要 的 DSL 设 计 工 具 。 那 么 ， 当 我 们 不 使 用 工作 台 候 ， 还 能 指望 从 
开发 环境 得 到 什么 文 持 呢 ? 

我 们 搜寻 的 目光 站 先 落 在 IDE 上 ， 显 然 这 里 最 有 可 能 找到 适用 于 DSL 编 写 的 先进 功能 。 通 用 
语言 的 编程 活动 可 以 从 IDE 那 里 获得 一 个 功能 完善 的 编辑 硕 ， 上 具备 声 法 高 完 、 代 码 补 全 等 诸多 编 
辑 功 能 。DSL 编 程 也 完全 应 该 获得 类 似 的 帮助 。 例 如 ， 如 果 我 们 用 Groovy 编 写 金融 中 介 系 统 的 内 
部 DSL， 会 希望 IDE 能 高 忱 显示 用 户 输 入 的 货币 代码 ， 也 会 希望 把 自动 代码 补 全 功能 应 用 在 系统 
文 持 的 金融 制度 上 。 

很 多 IDE 虽 然 还 不 具备 一 套 完 善 的 DSL 工 作 合 ， 但 已 经 开始 提供 语法 高 亮 和 自动 补 全 这 个 层 
面 的 工具 。 现 在 的 IDE 都 准备 了 插件 架构 ， 而 有 旦 都 是 可 扩展 的 。 我 们 可 以 自行 插入 代码 去 实现 语 
法 高 完 、 代 码 补 全 等 功能 ( 见 9.6 节 文献 [8] 和 文献 [9] )。 

Contraptions for programming 博 客 上 有 篇 文章 ( 见 9.6 节 文献 [8] ) 描述 了 一 种 在 Groovy-Eclipse 
平台 上 开发 DSL 的 插件 ， 开 发 者 可 以 目 己 定制 实现 语法 高 亮 的 功能 。Groovy-Eclipse 系 列 组 件 以 
接口 形 陈 提供 一 个 扩展 点 ,我们 可 以 通过 实现 该 接口 来 定制 实现 语法 高 赏 的 关键 字 。IntelliJIDEA 
也 包含 类 似 可 定制 的 Groovy DSL 支 持 功 能 ， 其 插件 可 实现 对 方法 和 属性 的 目 动 补 全 ( 见 9.6 市 文 
献 [9] )。 图 9-5 粗 略 说 明了 如 何在 IDE 的 插件 染 构 下 为 定制 的 DSL 实 现 语 法 高 忱 功能 。 















































插件 


X. 定制 的 语法 高 
IDE 核 心 亮 功能 插件 


图 9-$ 在 IDE 核 心 之 外 ， 我 们 可 以 实现 自己 的 插件 。 我 们 为 DSL 设 计 的 语法 高 亮 
插件 和 别 的 插件 一 起 成 为 IDE 的 一 部 分 


一 惠 以 来 ， 我 们 都 围绕 看 DSL 的 开发 展开 讨论 ， 而 在 当前 的 DSL 环 境 下 ，DSL 乒 本 的 有 序 演 
变 是 态 一 个 不 可 忽略 的 重要 议题 。 因此 下 一 市 我 们 将 粗略 探讨 一 下 应 该 上 怎样 合理 规划 DSL 的 成 长 
轨迹 ,使 得 DSL 的 多 个 版 本 可 以 共存 。 
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9.4 DSL 的 成 长 和 演化 


我 们 在 应 用 开发 实践 中 大 都 使 用 过 DSL。 它 的 主要 用 途 是 对 系统 中 频繁 改变 的 组 件 ( 比如 配 
置 参数 和 业务 规则 ) 进行 建 模 。 而 在 面临 改变 的 时 候 , 应 该 按照 什么 样 的 原则 去 指导 DSL 的 演化 ， 
这 是 一 个 需要 我 们 去 思考 完善 的 问题 。 我 们 甚至 在 部 署 DSL 的 第 一 个 版 本 之 前 ， 就 应 该 考虑 好 
DSL WERI - 


9.4.1 DSL 的 版 本 化 


DSL 的 使 用 情况 决定 了 我 们 需要 的 版 本 化 策略 。 如 果 我 们 的 DSL 只 有 一 小 群 固定 的 、 联 系 紧 
密 的 用 户 , 那么 不 规定 专门 的 版 本 化 策略 也 是 可 以 的 。 不管 是 修正 错误 还 是 增加 需求 ,我 们 可 以 
随时 用 新 的 版 本 替换 旧 的 版 本 ， 只 要 随 新 版 本 附 上 一 份 标 出 向 后 兼容 事项 的 简单 说 明 足 侨 。 

但 如 果 不 只 一 组 用 户 在 使 用 我 们 的 DSL 呢 ? 那 就 必须 规划 增 量 式 的 版 本 化 策略 了 。 由 于 不 是 
所 有 的 用 户 都 对 新 版 本 感 兴趣 ， 所 以 我 们 要 同时 采取 以 下 两 条 策略 : 

Q 代码 仓库 的 版 本 管理 体系 必须 能 够 同时 兼顾 多 个 发 行 版 的 维护 工作 ; 

a 必须 建立 专门 的 部 署 脚本 ， 且 该 脚本 要 能 够 部 署 DSL 的 多 个 版 本 。 

不 管 采取 什么 样 的 策略 , 至 少 以 下 问题 是 必须 解决 好 的 , 因为 任何 软件 模块 都 很 容易 在 演进 
过 程 中 遭遇 这 些 困 难 : 

OQ AI] JL ; 

Q 照顾 那些 不 适合 推广 为 一 般 情况 的 个 别 的 用 户 需 求 。 

我 们 有 可 能 遇 到 的 诸多 困难 情况 实际 上 不 一 定 是 DSL 特 有 的 问题 ， 而 是 软件 部 署 的 普遍 情 
况 。 下 一 市 我 们 将 针对 版 本 化 过 程 中 出 现 的 各 种 难题 ， 讨 论 在 设计 阶段 可 以 采取 的 一 些 措施 。 
































9.4.0 ”DSL 平稳 演化 的 最 佳 实践 


假设 我 们 在 应 用 里 使 用 了 第 三 方 的 DSL， 且 应 用 已 经 部 署 到 多 个 用 户 处 。 现 在 我 们 打算 给 应 
用 增加 一 些 功能 ， 同 时 发 现 DSL 的 新 版 本 刚好 增加 了 我 们 需要 的 特性 。 可 是 ， 新 版 的 DSL 并 不 能 
向 后 兼容 我 们 当前 使 用 的 版 本 。 我 们 该 怎么 办 呢 ? 

再 来 想象 一 个 场景 。 假 设 我 们 用 DSL 来 建 模 证 券 交 易 的 业务 规则 ， 而 这 些 业 务 规则 可 能 会 因为 
部 署 地 的 证 券 交 易 机 构 而 各 不 相同 。 碰 巧 现在 东京 证 券 交 易 所 修改 了 几 条 规则 ， 于 是 我 们 需要 推出 
一 个 针对 东京 证 券 交 易 的 新 版 本 。 这 太 可 怕 了 1 我 们 要 同时 维护 几 个 版 本 , 即使 睡 着 了 都 要 被 吓 醒 。 

还 是 看 看 有 什么 预防 的 办 法 吧 ， 人 免得 总 被 这 些 痊 人 的 问题 六 得 半夜 不 得 安宁 。 

1. 隐 式 上 下 文 模式 更 能 适应 版 本 演化 

请 回顾 一 下 4.2.1 节 中 这 段 基 于 连贯 接口 的 Ruby 内 部 DSL : 


Account.create do 


























number "CL-BXT-23765" 
holders "John Doe", "Phil McCay" 
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address "San Francisco" 
type "client" 
email "client@texample.com" 


end.save.and then do |al 


Registry.registNer(a) 

Mailer.new 
.to(a.email address) 
.CCc(a.email address) 
. subject ("New Account Creation") 
.body ("Client account created for #{a.no}") 
. send 

end 


这 段 表 现 账户 创建 过 程 的 DSL 运 用 了 内 部 DSL 设 计 的 隐 式 上 下 文 模式 。 比 起 一 个 规定 好 所 有 
参数 顺序 和 数量 的 create 方 法 ， 这 种 模式 写 出 来 的 DSL 更 容易 适应 未 来 的 演化 。 我 们 可 以 在 不 
影响 任何 原 有 用 户 的 前 提 下 ， 疝 account 抽象 增加 新 的 属性 。 

2. 用 自动 代 换 解决 向 后 兼容 

这 个 策略 的 做 法 是 通过 设 定 适当 的 默认 值 ， 将 旧 的 API 目 动 代 换 为 新 的 版 本 。 例 如 ， 下 面 的 
Scala DSL 片 段 定 义 了 一 笔 固 定 收 益 型 交易 ， 这 是 我 们 在 6.4.1 节 用 过 的 例子 : 


val fixedlIncomeTrade = 
200 discount bonds IBM for client NOMURA on NYSE at 72.ccy(USD) 


用 户 对 这 段 DSL 很 满意 。 交 易 按照 脚本 中 指定 的 贫 币 进行 ( 即 代码 厂 段 中 的 UsD ) 这 种 赁 币 
称 为 交易 货币 。 交 易 最 后 还 要 经 过 一 个 结算 过 程 , 我 们 的 DSL 假 定 结算 和 区 易 用 的 是 同一 种 货币 。 
未 来 采 一 天 ,规则 坚 无 悬念 地 发 生 了 变化 , 用户 收 到 通知 说 ,现在 允许 按照 交易 贫 币 之 外 的 为 一 
种 赁 币 〈 称 为 结算 货币 ) 结算 。 于 是 DSL 也 相应 地 变 成 了 下 面 的 新 版 本 : 


val fixedlincomeTrade = 
200 discount bonds IBM for client NOMURA on NYSE at 72.ccy(USD) settled in JPY 


现在 的 问题 是 , 那些 用 旧版 处 理 引 警 写成 的 DSL 脚 本 会 发 生 什 么 情况 ?这些 脚 本 很 可 能 会 骨 
演 ， 因 为 它们 的 语义 模型 里 根本 找 不 到 一 个 表示 结算 货币 的 值 。 

我 们 可 以 对 语义 模型 做 一 个 目 动 代 换 ,从 而 解决 这 个 问题 , 把 缺少 的 结算 代 币 取 值 默认 地 设 
为 与 交易 货币 相同 。 这 样 一 来 ， 用户 可 以 平稳 地 迁移 到 新 版 本 的 DSL， 同 时 旧 的 DSL 脚 本 也 能 继 
续 顺 利 执行 下 去 。 

3. 门面 式 的 DSL 设 计 可 以 解决 诸多 版 本 化 问题 

还 记得 我 们 在 5.2.1 布 讨论 过 的 DSL 门 面 吗 ?门面 充当 了 模型 API 的 保护 层 ， 方 便 我 们 调整 和 
塑造 公开 给 用 户 的 语法 外 观 。 假 如 后 续 的 版 本 需要 修改 DSL 语 法 ， 可 以 将 改动 限制 在 DSL 门 面 的 
范围 内 ,这样 就 不 会 对 下 层 的 模型 有 任何 影响 。 这 个 策略 尤其 适用 于 新 版 DSL 仅 包含 少量 语法 变 
动 的 情况 。 

4. 遵从 优秀 抽象 设计 的 各 项 原则 

附录 A 对 优秀 抽象 设计 的 原则 做 了 很 详细 的 解说 ， 请 你 务必 一 读 再 读 。 只 有 遵循 这 些 设计 原 
则 ， 用 户 才能 和 我 们 的 DSL 一 起 从 容 地 面 对 演 化 。DSL 的 版 本 化 和 API 的 版 本 化 同样 重要 。API 
越 是 死板 僵化 ， 就 越 难 跟随 新 版 本 一 起 演变 。 
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无 论 我 们 选择 什么 样 的 策略 , 都 必须 留 有 余地 , 让 多 个 版 本 的 DSL 可 以 在 同一 个 应 用 中 共存 。 
DSL 开 发 领域 还 处 于 挽 索 阶段 ,需要 更 多 的 时 间 才 能 成 熟 。 只 要 我 们 能 多 考虑 DSL 用 户 的 未 来 逢 
要 ， 就 是 对 DSL 发 展 的 积极 帮助 。 











9.5 小 结 


好 啦 ， 本 书 的 旅程 到 此 结束 。 我 们 从 所 有 的 方面 论证 了 DSL 是 一 种 更 好 的 领域 建 模 方式 ， 叉 
在 这 一 章 展望 了 基于 DSL 开 发 的 未 来 趋势 。DSL 工 作 台 以 其 涵盖 语言 完整 生命 期 的 工具 集合 ， 有 
望 把 DSL 的 演变 之 路 安排 得 更 井井有条 。 各 种 编程 语言 就 在 我 们 眼前 一 天 天 地 提高 着 它们 的 表现 
力 ， 越 来 越 适 合作 为 DSL 的 和 窒 主 语言 。 不 管 我 们 选择 哪 种 语言 来 开发 DSL， 都 要 坚持 设计 原则 ， 
这 样 才 有 助 于 DSL 增 量 、 迭 代 地 健康 成 长 。 

本 书 讨论 了 几 种 具备 优秀 的 语言 特性 、 特 别 适合 用 于 设计 DSL 的 JVM 语 言 。 它 们 除了 各 具 特 
色 ， 充 分 胜任 DSL 设 计 工 作 以 外 ， 又 因为 都 运行 在 JVM 之 上 ， 而 获得 了 与 Java 无 障 但 互 操作 的 能 
力 。 这 是 一 个 很 大 的 优点 ， 因 为 我 们 可 以 选择 一 种 语言 来 满足 DSL 的 需要 , 但 又 不 会 被 束缚 在 唯 
一 一 种 选 定 的 语言 上 。 

除 JVM 语 言 外 ， 还 有 很 多 其 他 语言 也 被 广泛 地 用 于 设计 DSL。 其 中 领跑 的 有 纯 函 数 式 语 言 
Haskell 和 面向 并 发 编程 的 Erlang。 软 件 开 发 圈 已 经 认识 到 ， 只 有 使 用 那些 有 能 力 提供 高 阶 抽象 的 
语言 ， 才 是 化 解 领 域 建 模 复杂 性 的 唯一 出 路 。 而 产 出 优美 的 、 可 重用 的 抽象 的 途径 之 一 ， 正 是 
DSL 驱 动 的 开发 方式 。 好 的 DSL 可 以 提高 生产 力 ， 使 代码 易于 维护 和 移植 ， 还 带 给 用 户 一 个 友善 
的 界面 ， 把 所 有 不 必要 的 细节 都 隐藏 起 来 。 总 之 DSL 就 是 领域 模型 该 有 的 样子 。 今天， 我 们 已 经 
在 现实 的 软件 开发 中 见证 了 DSL 展 露 的 潜力 。 









































要 点 与 最 佳 实践 
口 基于 DSL 的 应 用 开发 相对 来 说 还 是 软件 行业 的 一 个 新 课题 。 请 保持 对 其 发 展 动态 的 关注 。 
O 在 基于 DSEL 的 开发 领域 ， 相 关 的 工具 支持 发 展 得 很 快 。 一 一 数 来 ， 从 IDE 到 原生 的 DSL 
工作 人 台 ， 丰 人 钙 的 工具 总 是 能 够 促进 开发 生态 的 发 展 。 
口 所 有 获得 关注 的 新 语言 都 有 一 些 可 以 用 在 DSL 设 计 上 的 独到 之 处 。 即 使 我 们 喜好 的 语言 
没有 直接 提供 茶 些 对 开发 和 DSL 实 现 有 确 当 好 处 的 特性 ， 我 们 也 可 以 尝试 去 模拟 它们 。 
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读者 应 该 把 这 篇 附录 作为 本 书 全 部 讨论 的 铺垫 。DSL 是 窗 亲 在 实现 模型 之 上 的 一 层 抽象 ， 而 
实现 模型 亦 不 过 是 在 问题 域 模型 之 上 , 用 解答 域 的 技术 平台 做 出 的 一 层 抽 乏 。 如 果 不 能 税 握 设计 
抽象 的 正确 方法 , 设计 出 来 的 领域 模型 就 找 不 准 抽象 层次 , 那么 DSL 中 用 来 表示 领域 模型 的 文法 
规则 也 会 跟 看 出 现 仿 差 。 所 以 ， 我 们 来 看 看 走 么 让 抽象 找到 最 适合 它 的 位 置 。 


A.1 设计 得 当 的 抽象 应 具备 的 特质 


本 市 集中 讨论 在 设计 得 当 的 抽象 时 上 可 以 找到 的 一 些 特质 ,讨论 中 会 用 软件 工程 和 程序 设计 
领域 作为 参照 来 帮助 理解 , 不 过 重点 是 如 何 拥有 一 份 精心 设计 的 抽象 , 协助 你 更 轻松 地 构建 出 可 
重复 利用 的 领域 模型 。 随 着 讨论 未 渐 深入 ,你 将 理解 并 竺 会 欣 芝 ， 抽象 在 设计 一 个 复杂 的 领域 柑 
型 中 所 扮演 的 中 心 角 色 。 经 过 一 系列 提取 抽象 的 练习 ,你 将 能 够 越 来 越 熟练 地 从 嗜 杂 的 细节 中 提 
炼 出 模型 的 核心 概念 。 为 此 , 我 们 首先 要 讨论 几 种 特质 , 正 是 它们 把 优秀 的 抽象 设计 和 失败 的 抽 
象 设 计 区 别 开 来 。 


本 节 用 易于 理解 的 语言 ， 讨 论 设计 得 当 的 抽象 所 应 具备 的 若干 优良 品 性 。 我 会 一 

边 讨 论 ， 一 边 列 出 代码 片段 来 演示 这 些 优良 品 性 在 具体 实现 中 的 不 同 侧面 。 讨 论 
到 某 个 侧面 的 时 候 ， 我 会 选取 最 能 充分 展现 其 特征 的 编程 语言 来 作 解释 。 虽 然 面向 对 象 
编程 范式 占据 的 篇 幅 最 大 ,但 也 有 不 少 例子 用 了 函数 式 编 程 原则 来 实现 。 如 果 你 对 某 些 
例子 所 用 的 语言 不 熟悉 ,也 不 用 和 急 着 去 翻 书架 。 因 为 都 是 一 些 简单 而 且 符合 直觉 的 例子 ， 
不 需要 对 具体 语言 有 深入 研究 , 也 能 顺利 地 理解 其 中 的 设计 原则 。 万 一 需要 了 解 某 些 语 
言 特性 ， 附 录 C 到 附录 上 已 经 为 你 准备 好 了 。 


每 一 个 抽象 部 问 其 客户 提供 一 个 功能 。 为 了 完成 其 功能 ,抽象 器 外 公开 一 僚 如 约 (也 叫做 接 
口 ) 供 客户 使 用 。 自 约 根 据 客户 的 性 质 可 以 有 各 种 变化 。 姻 约 背 后 都 有 对 应 的 实现 ， 而 且 通 篆 以 
抽象 化 手段 把 实现 对 客户 隐藏 起 来 ， 客 户 只 能 看 到 公开 的 契约 。 

接 下 来 的 三 市 将 分 别 对 设计 得 当 的 抽象 所 具备 的 几 种 特质 作 初 步 的 介绍 , 稍 后 还 会 进行 深信 
的 讨论 。 




















附录 A 抽象 在 领域 建 模 中 的 角色 — 247 


A.1.1 极 简 

根据 客户 的 性 质 ， 你 可 能 决定 暴露 一 定 程 度 的 实现 细节 。 但 问题 是 ， 暴 露出 来 的 细节 一 旦 公 
开 给 客户 ,就 会 和 客户 耦合 在 一 起 。 所 以 要 确保 暴露 的 细节 是 为 了 实现 对 客户 承诺 契约 要 求 的 必 
不 可 少 的 要 件 。A.2 节 讨论 到 抽象 的 极 简 特质 时 ， 会 再 详 谈 这 个 话题 。 





A.1.2 ”精炼 


设计 得 当 的 抽象 ,必定 不 能 含有 核心 关注 点 以 外 的 任何 非 必要 细节 。 抽 和 象 的 实现 应 该 达到 足 
够 的 纯粹 度 ,， 尽 可 能 减少 细节 ,但 又 不 损失 必要 的 意义 。 使 抽象 具备 这 种 性 质 的 过 程 ， 是 一 个 精 
炼 过 程 ， 我 们 将 在 A.3 节 话 谈 。 


A.1.3 扩展 性 和 组 合 性 


所 谓 工 程 ， 讲 求 用 模块 化 的 方式 来 设计 事物 ， 并 能 通过 组 合 进行 扩展 。 除 了 外 部 的 组 合 ， 软 
件 抽象 还 要 能 够 从 内 部 进行 扩展 。 对 于 今天 设计 的 抽 乏 ,未 来 也 许 需 要 对 其 补充 额外 的 功能 。 重 
点 是 补充 进来 的 部 分 不 能 影响 到 已 有 的 用 户 。A.4 节 将 详细 探讨 如 何 用 时 下 的 编程 语言 ， 实 现 能 
够 无 颖 扩展 的 抽象 。 

扩展 性 只 有 通过 组 合 性 来 达到 ,行为 得 体 的 抽象 , 可 以 组 合 起 来 构成 更 高 层次 的 抽象 。 但 是 ， 
怎样 才能 设计 出 方便 组 合 的 抽象 呢 ?” 如 来 抽象 的 副作用 波及 到 整个 执行 环境 , 会 发 生 什么 事情 ? 

当 你 清楚 地 知 站 好 的 抽象 具有 哪些 特质 时 , 对 于 抽象 在 领域 模型 设计 中 所 起 的 作用 束 有 了 评 
判 能 力 。 理 解 了 这 些 特质 ,你 就 会 认识 到 ,为 什么 要 把 抽象 摆 到 正确 的 层次 上 才能 保证 模型 和 领 
域 有 共同 语言 。 只 有 这 样 ， 你 写 出 来 的 代码 ， 其 表现 力 才 不 亚 于 领域 专家 所 说 的 行 话 。 


A.2 极 简 ， 只 公开 对 外 承诺 的 


假设 你 要 在 金融 中 介 系 统 中 设计 一 个 抽象 , 它 的 功能 是 根据 设 定 的 一 组 价格 类 型 ,对 外 公布 
有 某 种 金融 票据 的 不 同类 型 的 价格 。 市 场 中 交易 的 每 一 种 票据 都 有 好 几 种 价格 ， 比 如 开盘 价 、 收 盘 
价 、 当 前 市 价 ,等 等 。 抽 象 应 该 有 一 个 publish 方 法 ,可 以 给 它 指定 一 种 票据 和 一 个 价格 类 型 的 
列表 作为 参数 。 该 方法 返回 一 个 Map ， 其 中 的 键 是 价格 类 型 ， 而 值 是 给 定 票据 的 相应 价格 。 我 们 
首先 会 写 出 这 样 的 Java 程 序 : 
class InstrumentPricePublisher { 
public HashMap«PRICE TYPE, BigDecimal» publish(Instrument ins, 
List«PRICE TYPE» types) { 


HashMap«PRICE TYPE, BigDecimal» m - 
new HashMap«PRICE TYPE, BigDecimal»(); P 填充 HashMap 
































return m; 
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你 的 本 童 是 让 publish 方 法 返回 一 个 Map， 内 含 给 定 昧 据 的 价格 类 型 和 对 应 价格 。 但 上 面 的 
实现 返回 『HashMap， 它 是 方法 内 部 用 来 存储 数据 的 一 个 特 化 的 Map 抽 象 。 这 个 特 化 的 抽象 把 
内 部 的 实现 暴露 给 了 客户 。 3k I HashmapQ T 7T S829, 那么 客户 代码 就 和 HashMap 耦 合 起 
XT. 

假如 后 来 需要 把 内 部 的 数据 结构 换 成 rreeMap, 该 怎么 办 呢 ? 没 办 法 , 那样 做 会 破坏 已 有 的 
客户 代码 。 所 以 抽象 就 失去 了 读 化 的 能 力 。 怎 么 避免 这 样 的 问题 呢 ? 


A.2.1 用 泛 化 来 保留 演化 余地 


马后炮 总 是 很 响 ， 眼 前 就 是 这 么 个 情况 。 当 初 的 抽象 设计 应 该 在 满足 契约 承诺 的 前 提 下 , 返 
回 最 宽泛 的 类 型 。 契 约 原 本 承 诡 的 是 返回 一 个 Map ， 一 种 支持 键 值 对 和 查找 策略 的 数据 类 型 。 所 
以 ， 下 面 才 是 正确 的 写法 ， 尽 量 不 双 露 内 部 实现 ， 并 且 把 返回 类 型 调整 到 恰当 的 层次 : 
class InstrumentPricePublisher { 
public Map«PRICE TYPE, BigDecimal» publish(Instrument ins, 

List«PRICE TYPE» types) ( 

Map«PRICE TYPE, BigDecimal» m - Collections.emptyMap(); 

for(PRICE TYPE type : types) { 

m.put (type, getPrice(sec, type)); 
j 


return m; 


























} 
} 


看 过 具体 的 例子 后 ,你 觉得 哪些 关键 症状 可 以 让 你 察觉 抽象 违反 了 最 少 公开 原则 ? 下面, 我 
们 来 探讨 一 些 有 助 于 诊断 的 基本 概念 。 


A.2.2 用 子 类 型 化 防止 实现 的 泄露 


我 们 都 知道 , 面 回 对 象 方法 用 继承 手段 来 对 抽象 的 共性 和 变异 性 建 模 。 在 基底 抽象 中 定义 的 
行为 ， 可 以 被 下 级 抽象 用 覆盖 的 方式 进行 细 化 。 在 由 此 产生 的 层级 结构 中 ， 越 靠近 叶子 部 分 ， 抽 
象 就 越 精细 ,公开 的 契约 也 更 为 特 化 。 用 继承 的 概念 来 对 子 类 型 化 建 模 ， 正 好 表现 出 抽象 逐 级 细 
化 的 情形 。 子 类 型 化 , 顾名思义 , 子 类 型 的 契约 必须 从 父 类 型 那里 继承 得 来 , 但 仅 限 于 继承 契约 ， 
契约 的 具体 实现 是 子 类 型 自己 的 事情 ， 图 A-1 演 示 这 个 概念 。 

较为 特 化 的 类 型 称 为 一 般 化 类 型 的 子 类 型 。 子 类 型 化 并 不 表示 上 下 级 的 类 型 会 共用 同一 个 实 
现 。 基 于 “类 ”( class ) 的 面向 对 象 语言 ， 如 Java 和 C#i 通 过 接口 继承 (文献 [2] ) 来 完成 子 类 型 化 。 
可 是 在 大 多 数 基于 类 的 面向 对 象 语言 中 ,“ 子 类 型 化 ”〈subtyping ) 往往 被 当做 “ 子 类 化 ” 
( subclassing ) 的 同义词 ， 并 因此 导致 混乱 的 语义 和 脆弱 的 抽象 层级 结构 。 如 果 使 用 得 当 , 接口 继 
承 是 一 件 有 力 的 工具 , 可 以 在 有 杀 缘 关系 的 抽象 族 内 建立 牢靠 的 类 型 层次 结构 。 如 果 单 纯 通过 子 
类 型 化 手段 扩展 抽象 ， 绝 无 泄露 实现 之 诗 ， 同 时 得 到 的 抽象 是 极 简 特 质 的 最 佳 范本 。 

通过 继承 来 对 抽象 的 行为 进行 细 化 , 很 难 避 人 免 在 上 下 级 抽象 之 间 共 享 实现 的 情况 , 这 种 情况 
一 般 称 为 实现 继承 。 
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1 <<interface>> 
Re 一 


issue() 











纯 接 口 继承 


issue() 


issue() issue () 


// 针对 固定 利息 票据 // 针对 浮动 利息 梭 据 





// 发 行 的 实现 // 发 行 的 实现 
J 


图 A-1 通过 接口 继承 完成 子 类 型 化 。 子 类 型 FixedqIincome 和 Equity 仅 从 父 类 
型 Instrument 继 承 其 接口 ， 然 后 自行 提供 实现 
A.2.3 正确 实施 实现 继承 
如 果 能 正确 实施 ， 实 现 继承 是 一 种 非常 有 用 的 技巧 。 但 这 种 技巧 很 容易 被 滥用 ， 一 不 小 心 ， 
子 类 就 随意 地 与 基 类 实现 产生 耦合 。 图 A-2 演 示 了 这 种 状况 。 


issue() 








issue() 


— — // 实现 








A 






共享 实现 (谨慎 使 用 ) 


issue() 


Equity 


issue() 





issue() - 
super.issue() 


issue() - 
super.issue() 


// 针 对 固定 利息 票据 














// 针对 主动 利息 要 
/ 发 行 的 实现 





// 发 行 的 实现 


图 A-2 ”实现 继承 产生 的 耦合 。FixedIncome 和 Equity 的 1ssue() 方 法 重用 了 基 类 的 实现 
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图 中 的 做 法 使 子 类 也 成 了 基 类 的 客户 ， 而 且 基 类 的 实现 被 泄露 到 子 类 。 这 就 产生 了 OO 建 模 
中 称 为 脆弱 基 类 的 问题 ， 对 基 类 实现 的 任何 修改 ,都 有 可 能 打破 子 类 的 契约 ,因而 使 抽象 的 演化 
成 为 近乎 不 可 能 的 任务 。 这 个 例子 的 情况 和 前 面 的 InstrumentPricePublisher 相 似 ， 根 本 问 
题 就 是 基础 抽象 把 实现 公开 给 客户 。 

从 本 节 的 例子 可 以 总 结 出 一 个 重要 原则 : 只 公开 有 必要 的 部 分 ,并 且 只 向 有 必要 的 对 象 公开 。 
不 遵从 此 建议 ， 就 有 曝光 过 度 、 实 现 泄露 的 危险 ， 也 违背 极 简 原则 。 


A.3 精炼 ， 只 保留 目 身 需要 的 


在 A.1 广 的 讨论 中 ， 我 们 说 过 ， 抽 象 应 该 只 向 其 客户 公开 核心 的 、 必 不 可 少 的 部 分 ， 这样 从 
外 部 看 起 来 ,抽象 是 简洁 的 ; 而 抽象 内 部 的 设计 是 否 简洁 ， 也 同样 重要 。 所 谓 精 炼 ， 即 指 从 事物 
中 某 取 其 本 质 的 过 程 。 对 抽象 设计 来 说 ， 精 性 是 指 去 除 实现 中 的 非 本 质 细 节 ， 使 抽象 的 实现 保持 
纯粹 的 过 程 。 


A.3.1 什么 是 非 本 质 的 


你 肯定 会 问 , 如 何 才能 知道 哪 部 分 实现 是 非 本 质 的 ?” 我 引用 专家 的 话 来 回答 : ARAIA 
识 和 清醒 的 头脑 去 研究 你 的 抽象 ， 有 过 这 样 的 经 验 ， 上 日 然 能 够 辨别 出 来 。 还 可 以 下 一 个 非 正 式 的 
定义 : 磊 抽 和 象 中 的 一 处 细 不 能 映射 到 有 菏 个 核心 事项 ， 那 么 该 处 细 克 就 是 非 本 质 的 。 

假设 你 打算 找 一 份 领 域 建 模 师 的 工作 , 于 是 打开 文字 处 理 软件 起 草 求职 申请 。 你 打字 的 同时 ， 
软件 通过 内 置 的 拼写 检查 融 标 出 不 正确 的 字 词 。 那 么 , 你 什么 时 候 关 心 过 软件 目 市 拼写 检查 从 的 
确切 版 本 ? 又 有 哪 次 拼 与 检查 大 没有 随 软 件 局 动 , 而 需要 你 专门 开局 ” 理所当然 地 , 你 会 假定 软 
件 打开 的 时 候 ， 拼 写 检 查 功 能 已 经 准备 就 绪 , 将 会 正确 无 总 地 运行 。 如 有 每 打 一 个 字 午 要 特地 检 
碍 、 开 局 一 届 ， 反 而 说 明 流 程 中 舍 有 非 本 质 的 细 世 。 

如 何 提 炬 抽象 ,去 除非 本 质 细 市 ?对 于 这 方面 基本 概念 的 解释 , 会 再 次 用 到 基于 类 的 面向 对 
象 编程 中 的 一 种 第 见 模式 。 例 子 照旧 来 日 金融 中 介 系 统领 域 , 如 末 对 此 领域 不 询 悉 ,可 以 翻阅 第 
1.2 和 1.3 区 的 插 叙 ， 那 里 介绍 了 一 些 相关 的 概念 。 


A.3.2 ” 非 本 质 复杂 性 


交 给 你 一 个 任务 : 设计 一 个 TradeProcessor 抽 和 象 ， 当 它 收 到 提交 的 一 组 交易 时 ， 将 计算 出 
各 种 交易 细节 , 包括 交易 净值 、 应 付 的 各 种 税 费 和 佣金 ， 还 有 与 交易 市 场 相 关 的 其 他 信息 。 你 设 
计 出 来 的 抽象 大 概 如 同 代 码 清单 A-1 的 样子 。 


代码 清单 A-1 TradeProcessor 处 理 各 种 交易 细节 


class TradeProcessor i1 




































































private SettlementDateCalculator calculator; 
public TradeProcessor() í( 
ery X 
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calculator = new SettlementDateCalculatorImpl(í(..); 
) catch (InitializationException ex) { //.. } 
j 
public void process(List«Trade» trades) { 
for(Trade trade: trades) ( 
calculator.settleOn(trade.getTradeDate()); 
j 
// 其 余 处 理 过 程 
j 
j 


TradeProcessor 需 要 按照 “交易 充实 ”过 程 的 规定 计算 结算 日 ， 该 日 期 的 计算 牵涉 成 交 前 
后 的 各 种 HA ， 由 SettlementDateCalculator 人 负 责 提 供 计 算 服务 。 假设 SettlementDate- 
Calculator 是 一 个 独立 的 接口 SettlementDateCalculatorImpl 是 其 实现 ， 负责 根据 成 交 
日 期 及 其 他 上 下 文 信息 确定 结算 日 B TradeProcessor 的 构造 器 创建 一 个 SettlementDate- 
CalculatorImpl 的 实例 并 保存 在 上 下 文中 ， 供 process 方 法 后 续 使 用 。 也 就 是 说 
TradeProcessor 实 例 初始 化 了 一 个 服务 ， 就 要 对 其 全 生命 周期 负责 Settlement- 
DateCalculator Impl 的 构造 器 可 能 很 复杂 ， 需 要 其 他 服务 的 协助 才能 成 功 初始 化 。 

万 一 哪个 服务 初始 化 失败 了 呢 ? 如 采 遇 到 这 样 的 情况 , TradeProcessor 类 要 人 负 贡 在 其 构造 
谷中 处 理 因 此 发 生 的 异常 连锁 反应 ,并 安排 相应 的 恢复 措施 。 那么 ，TradeProcessor 作 为 一 个 
领域 抽象 ， 应 不 应 该 由 它 来 考虑 这 些 事 情 呢 ? 

TradeProcessor 是 一 个 领域 对 象 。 那么 在 设计 它 的 时 候 ， 就 应 该 只 把 它 当 做 一 个 领域 对 象 
来 规划 ,考虑 这 个 领域 对 象 如 何 配 合 其 他 领域 对 象 和 领域 服务 ,完成 它 回 客户 承诺 的 职责 。 人 至 于 
如 何 实 例 化 ， 如 何 管理 各 种 服务 的 生命 周期 , 这 些 都 不 是 领域 抽象 的 核心 职责 。 从 上 面 的 例子 可 
以 看 出 , 领域 对 和 象 的 设计 很 容易 把 一 些 非 本 质 的 复杂 性 也 参 杂 在 内 , 而 其 实 把 这 些 方面 放 到 更 低 
的 架构 层次 去 处 理 更 加 合适 。Fred Brooks 把 这 种 情况 称 为 偶然 复杂 性 (accidental complexity， 参 
见 A.6 市 文献 [1] )， 也 有 人 称 为 次 要 复杂 性 C incidental complexity )。 





























只 有 当 抽 象 中 的 非 本 质 复杂 性 被 限制 到 最 少时 ， 才 能 保证 抽象 处 于 一 个 恰当 的 层 
次 。 程 序 设计 者 应 该 注意 把 实例 化 和 相关 服务 的 生命 周期 管理 委托 给 DI ( 依赖 注 

A) 容器 等 底层 框架 。 

对 设计 过 程 的 每 一 步 都 应 该 进行 回顾 , 检查 一 下 抽象 是 否 足够 精 陈 , AE d ERAI T dt 
露 到 高 层 的 抽象 。 如 果 发 现 像 TradeProcessor 类 一 样 的 情况 ,就 知道 应 该 重新 调整 上 下 层 染 构 
的 职责 分 配 ， 消 除非 本 质 复 末 性 。 











A.3.3 ”撤除 杂质 


消灭 非 本 质 复杂 性 的 药方 , 还 是 那个 解决 了 很 多 计算 机 科学 问题 的 老 法 于 一 一 在 实现 语言 和 
领域 抽 像 之 间 引 入 一 层 新 的 间接 层 。 新 的 间接 层 将 领域 抽象 隔离 起 来 , 保护 它 免 受 非 本 质 复杂 性 


的 侵 染 。 
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在 思考 撤除 杂质 的 方法 之 前 ,我们 先 换个 角度 ,看 看 哪些 成 分 属于 杂质 。 我们 从 抽象 的 代码 
中 截取 另 一 段 来 进行 讨论 ， 应 该 撤除 的 信息 已 经 做 了 标注 。 
代码 清单 A-2 标注 了 非 本 质 细 市 的 TradeProcessor 版 本 


class TradeProcessor { 
private final SettlementDateCalculator calculator; 


public TradeProcessor() í( 管理 生命 周期 
try x 的 代码 
calculator = new SettlementDateCalculatorimpl(í..); 
) catch (InitializationException ex) { //.. ) 
j 6 服务 失败 时 的 异常 处 理 


J 
TradeProcessor 在 构造 器 中 实例 化 SettlementDatecalculator 的 一 个 具体 实现 @， 担 
负 了 管理 SettlementDatecalculator 服 务 牛 命 周 期 的 职责 。 因 此 产后 以 下 后 果 。 

口 从 此 TradeProcessor 对 该 服务 的 某 个 特定 具体 实现 产生 依赖 。 
为 TradeProcessor 编 写 单元 测试 时 ， 必 须 你 证 该 服务 实例 已 经 就 位 ， 还 要 保证 所 有 被 
依赖 的 服务 全 部 就 位 。 这 违反 了 抽象 应 该 可 进行 独立 单元 测试 的 原则 ， 而 且 一 旦 脱离 这 
个 具体 的 实现 环境 ， 抽 象 被 重用 的 可 能 性 大 大 降低 。 

Q TradeProcessor WJM it fr sSettlementDateCalculatorImpl AJW RLZ gs RA 
错误 处 理 代码 污染 @。 
代码 中 充斥 着 品 杂 的 细节 ， 这 些 细 太 不 应 该 成 为 nradeProcessor 的 首要 关注 方面 。 

对 于 哪些 成 分 属于 抽象 中 的 非 本 质 细 节 ， 你 有 所 了 解 了 吗 ? 很 好 ! 让 我 们 来 消炎 它们 吧 。 


A.3.4 ”用 DI 隐藏 实现 细节 


我 们 要 做 的 就 是 从 TradeProcessor 的 代码 中 去 除 涉及 settlementDateCalculator 人 牛 命 
周期 管理 的 部 分 。 正 确 的 方式 是 ， 当 TradeProcessor 需 要 SettlementDateCalculator 了 时 ， 
我 们 从 外 部 给 它 提供 一 个 实例 。 TradeProcessor 不 需要 关心 收 到 的 实例 属于 哪个 确切 的 具体 实 
H, 因为 相关 服务 的 实例 化 、 管理 和 终结 等 具体 事务 将 与 TradeProcessor 隔 离 。DI( dependency 
injection， 依 赖 注入 ) 会 蔡 我 们 完成 隔离 工作 。 




















定义 ”DI 框 架 是 一 种 外 部 容器 ， 它 通过 说 明 式 的 配置 代码 ， 创 建 、 装 配 、 连 接 各 种 依赖 项 ， 把 
它们 组 织 成 一 个 对 象 图 。 关 于 各 种 DI 技术 的 详细 说 明 ， 请 参阅 A.6 节 文献 [2]。 


我 们 使 用 Google 提 供 的 Guice 依 赖 注 入 框架 ( http://code.google.com/p/google-guice/ )， 把 依赖 
绑 定 到 settlementDateCalculator 的 具体 实现 。 下 面 的 代码 是 抽象 精炼 之 后 的 样子 。 


代码 清单 A-3 ”精炼 后 的 TradeProcessor 


class TradeProcessor { 
private final SettlementDateCalculator calculator; 指示 注入 位 置 
aInject 的 标注 
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public TradeProcessor(SettlementDateCalculator calculator) { 
this.calculator = calculator; 
) 2 干净 的 构造 器 
// 同 代码 清单 A-2 
} 


现在 ,rraaeprocessor 摆 脱 了 非 本 质 的 细节 , 实例 化 逻辑 也 被 移交 到 外 部 框架 。 目前 来 说 ， 
你 只 需要 了 解 如 何 绑 定 TradeProcessor 类 和 SettlementDatecalculator 的 具体 实现 即 可 。 
我 们 需要 在 Guice 里 面 配置 一 个 外 部 Module，Guice 会 在 应 用 程序 启动 时 完成 绑 定 。Guice 的 工作 
原理 在 此 不 作 介 绍 ， 重 点 是 通过 引入 一 个 外 部 框架 ， 得 以 去 除 原先 抽象 中 的 所 有 非 本 质 细 广 。 

精 炬 抽象、 撤除 非 本 质 复杂 性 的 手段 有 很 多 , DI 仪 仅 是 其 中 一 种 。 很 多 语言 实现 直接 提供 了 
强 有 力 的 语言 特性 ， 不 必 借 助 外 部 框架 来 达到 这 样 的 目标 。 第 6 草 讲 述 Scala 语 言 蝇 大 且 可 扩展 的 
议 态 类 型 系统 时 ,就 有 这 方面 的 例子 。 销 数 式 编程 里 的 高 阶 函 数 和 财 包 可 以 把 功能 外 部 化 ， 也 就 
是 把 非 本 质 细节 放 到 抽象 外 部 去 人 处理 。 第 5 章 详 细 讨 论 了 如 何 使 用 函数 式 编程 特性 来 设计 领域 模 
型 ， 也 将 深入 介绍 了 这 方面 的 例子 。 


A.4 扩展 性 提供 成 长 的 空间 


按照 A.2 症 和 A.3 节 的 原则 实施 ,我 们 的 抽象 已 经 具备 了 合适 的 曝露 度 ( 极 简 ) 和 纯粹 度 ( 精 
Mk). 可 是 现在 客户 又 要 求 给 程序 添加 新 功能 ， 所 以 你 不 得 不 在 抽象 中 加 入 祯 外 的 行为 。 那 么 现 
在 是 时 候 检 验 一 下 抽象 的 扩展 能 力 是 否 足 够 。 


A.4.1 什么 是 扩展 性 


扩展 性 的 作用 是 让 抽象 能 以 逐步 逐 块 的 方式 成 长 , 同时 不 影响 已 有 的 客户 。 不 同 的 开发 范式 
具有 不 同 的 扩展 性 机 制 。 本 市 将 总 括 性 地 介绍 如 何 运 用 面 癌 对 象 编程 和 咀 数 式 编程 领域 较为 流行 
的 技术 来 设计 具备 扩展 能 力 的 抽象 ,扩展 性 的 其 他 表现 形式 将 在 介绍 高 级 语言 特性 和 高 层次 抽象 
时 讨论 ， 详 情 请 参阅 第 5 草 至 第 8 草 。 

Java 中 的 Map 抽 象 提供 了 一 种 关联 性 数据 结构 的 基本 功能 ， 并 向 其 客户 提供 一 个 
Dictionary 接 口 。 标准 JDK 类 库 对 java .util .Map 进 行 了 好 几 种 扩展 。 其 中 一 些 是 具体 的 子 类 
实现 ， 例 如 HashMap 和 TreeMap 提 供 了 Map 接 口 的 全 部 操作 ， 但 内 部 采用 不 同 的 底层 存储 机 制 。 
2] - 些 是 对 Map 的 子 类 型 化 ， 例如 SortedMap 和 ConcurrentMap 提 供 了 比 Map 类 型 更 丰富 的 行为 
IB s 

那么 java.util.Map 的 扩展 能 力 如 何 呢 ? 假如 要 给 java.util.Map 增 加 一 项 特定 的 行为 ， 
并 且 要 求 对 Map 接 口 的 所 有 变 体 和 实现 起 作用 ， 应 该 怎么 做 呢 ? 请 仔细 考虑 一 下 这 个 问题 ， 因 为 
就 Java 语 言 提供 的 扩展 手段 而 言 ， 并 不 容易 找到 答案 。 

仅 对 HashMap 之 类 的 某 个 具体 实现 进行 扩展 并 不 可 行 ， 因 为 那样 的 话 ，Map 接 口 的 其 他 实现 
还 是 得 不 到 新 功能 。 

还 可 以 用 一 个 痛 饰 大 把 Map 的 实例 包 闭 起 来 (参见 A.6 节 文献 [3] ), 但 这 种 方案 只 有 在 特定 的 
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使 用 场景 下 才 有 效 。 在 其 他 用 例 中 ，Map 被 包装 之 后 ， 会 失去 原始 Map 实 例 的 一 些 重要 内 容 ， 例 
如 sortedMap 和 ConcurrentMap。 考 虑 以 下 的 例子 : 
class DecoratedMap<K, V» implements Map<K, V» { 
private final Map«K, V» m; 
pu eoeOGCOM DUM V> m) { Ò 包装 Map 
this.m = m; 


} 
//.. 
} 实现 Map<K, V» 


DecoratedMap<K, V> 装 人 饰 被 包装 对 象 Map<K， V> Q, 此 时 HII 使 客户 在 构造 句 中 传人 
concurrentMap 或 SortedMap 类 型 的 实例 ， 包 装 希 也 无 法 使 用 子 类 型 提供 的 额外 功能 。Eugene 
在 A.6 节 文献 [3] 讨 论 了 一 种 应 用 场景 ， 其 中 为 全 部 Map 实 现 提 供 扩展 功能 的 唯一 办 法 ， 是 编写 一 
个 独立 的 工具 函数 ， 虽 然 按 照 纯 粹 主义 者 的 观点 ， 这 是 完全 不 符合 面 品 对 象 的 方式 。 

最 后 的 对 琐 唯 有 从 涉 实 现 Map 接 口 ， 但 这 样 做 将 产生 大 量 复制 茜 贴 的 重复 代码 。 

看 过 所 有 的 可 能 性 之 后 ， 你 可 能 会 疑问 用 纯正 的 OO 方式 扩展 java.util.Map 为 什么 如 
此 困难 。 

我 们 面 对 由 抽象 组 成 的 一 个 层级 结构 ， 试 图 在 java .util .Map 类 型 的 所 有 实现 中 插入 一 个 
狐 的 行为 。 解 决 这 个 问题 迫切 需要 实现 继承 的 帮助 ， 更 确切 地 说 ,需要 多 重 实现 继承 的 帮助 ， 
为 这 其 实 是 一 个 行为 的 相 重 性 问题 。 我 们 需要 一 种 组 合 独 立 的 小 粒度 抽象 手段 , 通过 把 它们 无 缝 
地 附加 、 合 并 到 主 抽象 之 上 ， 来 实现 引入 新 行为 或 补益 已 有 行为 的 目的 。mixin 提 供 了 一 种 可 行 


的 途径 ,请 看 下 一 市 。 
A.4.2 mixin: 满足 扩展 性 的 一 种 设计 模式 


mixin 正 是 我 们 所 需要 的 手段 。 有 不 少 语言 提供 了 这 种 特性 ， 利 用 mixin 便 于 混合 、 搭 配 的 性 
质 ， 帮 助 开 发 者 建造 更 大 规模 的 抽象 。 

假设 提供 服务 的 金融 中 介 公 司 决 定 在 市 场 中 引入 一 种 新 的 票据 ,名 叫 热 市 风情 票据 。 这 种 票 
据 的 一 系列 特性 其 实在 一 般 的 票据 中 也 很 常见 , 因此 都 已 经 在 领域 模型 中 实现 过 了 。 R TTE 
是 把 各 种 已 有 的 特性 组 疙 起 来 ， 为 新 治 据 扩展 抽象 。 用 基于 mixin 的 编程 方式 来 实现 的 话 ， 售 下 
就 像 mixin 的 字面 意义 一 样 ， 把 各 种 单独 的 特性 “混入 ”基本 抽象 ， 就 能 组 合成 我 们 的 热带 风情 
票据 。 从 图 A-3 可 以 很 清楚 地 看 出 它们 是 怎样 “混入 ”的 。mixin 类 couponPayment、Maturable 
和 Tradqable 混 和 人 父 抽 和 象 Ins trument, 为 完整 的 类 ExoticInstrument 提 供 行 为 和 实现 。 

Gilad Bracha 是 一 位 计算 理论 学 家 ， 在 他 提交 到 1990 年 度 OQOPSLA ( 面 咎 对象 编程 、 系 统 、 
语言 及 应 用 ) 大 会 的 论文 《参见 A.6 节 文献 [4] ) 中 ，mixin 被 定义 为 一 种 抽象 子 类 ， 可 对 一 系列 多 
样 化 的 父 类 进行 行为 特 化 。mixin 不 可 以 被 单独 使 用 ， 所 以 把 它们 叫做 抽象 子 类 。mixin 定 义 统一 
的 类 扩展 ， 然 后 无 颖 地 附 在 一 个 抽象 家 族 身 上 ， 为 整个 抽象 家 族 增加 同样 的 行为 。Scala 
( http://www.scala-lang.org ) 通过 traits 的 形式 实现 mixin， 而 在 Ruby 中 则 叫做 Modules。trait 可 以 理 
解 为 Java 中 的 接口 ， 只 不 过 接口 中 的 方法 声明 还 可 以 包含 可 选 的 实现 给 基 类 共 至 。 
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issue() 
close() 


人 














Tradable 


CouponPayment Maturable | Tradable | 
trade () 


A 








Exoticlinstrument 


KA-3 ”基于 mixin 的 继承 。ExoticInstrument 从 Instrument 获 得 issue () 和 close() 的 
实现 ， 然 后 与 CouponPayment、Maturable、Tradable 等 mixin 组 合 


A.4.3 用 mixin 扩 展 Map 


现在 来 看 看 怎样 用 mixin 给 Map 抽 象 的 所 有 实现 增加 一 项 特定 行为 。 假 设 需要 给 各 种 Map 添 加 
一 个 同步 的 get 方 法 ， 禾 盖 原 本 的 API。 首 先 ， 在 Scala 中 定义 一 个 trait， 在 标准 Map 接 口 的 基础 上 
提供 一 个 新 增 行为 的 实现 。 
trait SynchronizedGet[A,B] extends Map[A, B] { 
abstract override def get(key: A): Option[B] = synchronized ( 
super.get(key) 


j 
l 


然后 这 个 行为 可 以 混和 人 Scala 的 任意 一 种 Map 类 型 变 体 ， 无 论 其 底层 如 何 实现 : 











val names = new HashMap[String, List[Stringl] 对 Scala HashMap 
with SynchronizedGet[String, List[Stringl] 进行 混入 


val stuff = new scala.collection.jcl.LinkedHashMap 


[String, List[Stringl] 7M AVA DinkpdRanhiap 
with SynchronizedGet[String, List[Stringl] 进行 混入 


注意 ， 在 最 后 的 实现 中 ，synchronizedGet 这 个 trait 是 在 运行 时 对 象 创建 期 间 被 动态 混 
入 的 。 
Scalatrait 还 可 以 作为 多 个 属性 的 组 合体 ， 项 态 地 混和 人 已 有 的 抽象 。Scala 的 trait 昆 人 手法 既 能 
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达到 实现 继承 的 目的 ， 又 避免 了 Java 实 现 的 缺点 。 第 6 章 介 绍 Scala 语 言 特 性 的 时 候 会 更 进一步 讨 
论 Scala trait, 
A.4.4 ”函数 式 的 扩展 性 


很 多 人 抱 急 OO 纺 程 迫 使 他 们 编写 很 多 不 必要 的 类 。 一 切 都 是 类 ”并 不 成 立 ， 虽 然 面 回 
对 象 有 时 候 希 望 你 这 样 想 。 在 现实 世界 中 ,很 多 问题 更 适合 建 模 成 函数 式 的 抽象 或 者 基于 规 








则 的 抽象 。 
假设 要 建 模 一 个 有 限 步 又 的 算法 ， 如 下 面 的 代码 片段 。 我 故意 省 略 了 作为 算法 输入 的 参数 。 
def process(...) = 1 
try 1 


if (init) proc 
} finally { end } 
j 


init 是 算法 的 初始 化 部 分 。 如 果 init 成 功 完 成 ， 接 着 调用 负责 核心 处 理 的 部 分 proc。end 
是 终结 部 分 ， 负 责 清理 各 种 资源 。 

现在 要 求 你 进行 扩展 ， 计 init、proc 和 enq 都 有 不 同 的 实现 。 一 种 思路 是 为 每 个 步骤 分 别 
定义 一 个 对 象 ， 把 各 阶段 的 流程 包装 成 finctor 或 者 函数 对 象 。 这 个 思路 是 可 行 的 ,但 如 果 能 够 发 
挥 函 数 式 编程 和 高 阶 函 数 的 作用 ， 会 得 到 更 好 的 结果 。 你 可 以 把 init、proc 和 end 建 模 为 函数 ， 
然后 作为 团 包 传 递 给 主流 程 。 如 下 所 示 : 














def process (init: =>Boolean, proc: =>Unit, end: =>Unit) = { .] 通用 的 算法 
try 1 
if (init) proc 
} finally { 
end 
1 
j 
def doInit = ( //.. ) <- 初始 化 加 核心 处 理 
def doProcess = ( //.. j 
def doEnd - ( //.. ) < 终结 





Toc] 44i DICE — PRHE EUR HZ S S ENA T8 A AREATA , TH AUR SEPIUS H] , 
它 将 是 一 件 高 效 的 工具 。 


A.4.5 扩展 性 也 可 以 临时 抱佛脚 


扩展 不 一 定 需 要 建立 新 的 抽象 。 不 少 语言 提供 一 种 叫做 开放 类 〈open class) 的 特性 ， 你 
可 以 癌 这 种 类 注入 新 的 方法 或 者 修改 类 中 已 存在 的 方法 ,直接 扩展 其 现 有 结构 Ruby 和 Groovy 
都 文 持 开放 类 , 允许 你 打开 任何 一 个 类 去 修改 其 行为 ,一 般 把 这 种 做 法 叫做 猴子 补丁 (monkey 
patching )。 很 多 开发 者 认为 猴子 补丁 极 不 安全 ， 对 它 大 皱眉 头 。 如 果 能 负责 任 地 运用 ， 这 种 
技术 可 以 发 挥 极 大 的 威力 ， 可 是 当前 的 软件 开发 中 能 找到 许多 实际 例子 ， 让 它 的 上 自我 标榜 站 
不 住 脚 。 
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Ruby 猴 子 补丁 的 主要 问题 在 于 缺少 语法 作用 域 ;加 在 一 个 抽象 上 的 任何 东西 都 会 进入 全 局 命 
名 空间 , 并 对 该 抽象 的 所 有 用 户 可 见 。Scala 在 这 一 点 上 要 好 很 多 , 它 提供 一 种 限制 词法 作用 域 的 
开放 类 , 在 Scala 的 术语 里 面 叫做 implicits, 通过 在 语法 作用 域内 的 隐 式 转换 来 扩展 现 有 类 。( 对 这 
种 语言 特性 的 讨论 可 参阅 http://debasishg.blogspot.com/2008/02/why-i-like-scalas-lexically-scoped- 
open.html ) 这 种 特性 出 乎 意料 地 有 用 , 能够 在 不 安全 的 Ruby 猴 子 补 丁 和 严格 封闭 的 Java 类 两 个 极 
mg FP RIT II SESS BUT E ex o 


A5 组 合 性 ， 源 自 纯粹 


有 大 量 的 研究 工作 等 试 将 体 化 形式 的 人 类 语言 教 授 给 其 他 录 长 类 动物 , 大 猩猩 和 黑猩猩 能 学 
会 由 符号 和 手势 组 成 的 语言 ， 并 用 来 沟通 ， 当 然 这 样 的 语言 只 是 人 类 原始 语言 的 一 种 何 化 组 合 。 
虽然 它们 可 以 学 会 越 来 越 多 的 词汇 , 但 始终 没 能 发 展 出 把 语言 组 织 成 句子 的 能 力 。 人 类 大 脑 有 一 
个 部 位 叫做 Broca 区 ， 人 负责 让 我 们 有 能 力 组 织 出 符合 语法 的 句子 。 语 法 组 织 能 力 使 现实 世界 的 交 
流 有 意义 、 有 条 理 、 有 上 下 文 关系 。 作 为 现实 世界 的 模型 ,软件 抽象 在 定义 和 公开 各 种 契约 时 ， 
也 应 该 使 它们 具备 同样 的 有 意义 的 交流 能 

我 们 平常 使 用 电脑 时 ,操作 系统 会 时 不 时 下 载 一 些 安装 包 、 更 新 包 和 新 版 本 的 系统 。 这些 组 
件 并 不 是 全 都 由 同一 个 人 开发 的 , 也 不 是 全 部 同时 开发 的 。 但 它们 能 够 顺利 地 互相 通信 ,无 颖 地 
组 合 在 一 起 ， 并 用 抽象 化 的 方式 回 你 隐藏 所 有 的 实现 差异 。 

以 目前 的 软件 开发 生态 来 说 ,并 不 存在 一 种 编程 语言 既 能 扮演 兼容 层 ， 同 时 又 满足 各 方面 的 
要 求 。 相 反 ， 我 们 用 功能 强大 的 运行 时 和 中 间 件 作为 答 主 ， 容 纳 多 种 语言 、 协 议和 分 布 式 机 制 ， 
并 在 它们 之 间 实 现 相 互通 信 。 软 件 开发 时 , 不 同 的 组 件 会 用 不 同 的 语言 。 组 件 代 码 的 规模 可 能 只 
有 几 行 , 也 可 能 是 成 百 上 千 行 。 但 不 管 是 什么 样 的 组 件 , 我 们 希望 它们 可 以 像 预 制 单元 一 样 组 合 ， 
并 且 无 颖 地 连接 到 其 他 软件 基础 设施 构成 的 生态 系统 中 。 

面 问 对 象 编程 可 运用 聚合 、 参 数 化 、 继 素 等 技巧 ， 将 小 的 抽象 发 展 成 大 的 抽象 。 但 这 些 技巧 
都 有 其 负面 影响 ,每 一 次 运用 都 应 该 详 加 考虑 。 例 如 ， 在 Java 中 使 用 实现 继承 会 使 类 结构 之 间 出 
现 不 必要 的 耦合 ， 因 而 损害 扩展 能 力 。 如 有 果 严 格 莹 循 设计 模式 所 建议 的 最 佳 实践 ， 就 可 以 避 人 免 这 
类 负面 影响 。A.3 贡 已 经 举 过 一 个 设计 模式 的 例子 ， 我 们 用 DI 模 式 消 除 组 件 中 多 余 的 细节 ， 达 到 
撤除 杂质 的 目的 。 接 下 来 让 我 们 看 看 设计 模式 还 可 以 在 哪些 地 方 发 挥 作用 。 


A.5.1 用 设计 模式 满足 组 合 性 
有 一 种 常用 模式 可 以 癌 客 户 提 供 对 一 组 动作 的 抽象 ，Gamma 等 人 称 之 为 Command 模 式 (C 
见 A.6 方 文献 [3] )。 这 种 设计 模式 的 目的 是 把 对 动作 的 请 求 封装 成 一 个 对 象 , 这 样 就 可 以 用 不 同 的 


请 求 对 客户 作 参 数 化 ， 还 可 以 对 请 求 排队 、 记 录 请 求 日 志 ， 实 现 操 作 撤 销 和 恢复 功能 。 图 A-4 表 
现 了 Command 模 式 要 求 的 抽象 结构 。 
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Receiver 






ConcreteCommand 


图 A-4 Command} 75] HE KIZZA 5 HAM ERRORS. PS So AE DP 
当前 的 执行 上 上下文， 仍然 可 以 重用 


Command 设 计 模 式 将 调用 者 及 接受 者 与 将 要 执行 的 命令 解 耦 。 因 此 单个 的 命令 即使 脱离 了 当 
前 的 调用 者 、 接 受 者 构成 的 上 下 文 ， 也 可 以 单独 重用 。 甚 至 可 以 将 单个 命令 单元 聚合 起 来 ， 构 成 
更 高 层次 的 命令 。 通 过 聚合 (aggregation) 的 方式 ， 命 令 是 可 组 合 的 。 图 A-$ 表 现 了 用 聚合 手段 
体现 抽象 的 组 合 性 ， 设 计 出 Macrocommand (KMS ) 的 场景 。 























execute () 
=> 
for all c in commands 
do 


c.execute () 





commands 


图 A-5 ”MacroCommand 是 对 命令 的 组 合 。 执 行 MacroCommand 等 于 级 联 地 执 
行 组 成 它 的 一 系列 命令 


Command 模 式 以 及 它 的 复合 形式 , 提供 了 一 种 宏观 层次 的 组 合 能 力 ; 原本 独立 执行 特定 动作 
的 对 象 , 变 成 可 以 编排 组 合 的 元 件 。 但 在 UI 的 设计 中 , 开发 者 需要 动态 增 减 显 示 组 件 的 单个 特性 ， 
此 时 需要 比 Command 模 式 粒度 更 低 的 组 合 能 力 。 抽象 公开 的 接口 是 固定 的 , 但 通过 该 接口 组 合 起 
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来 的 对 象 各 有 一 套 功 能 。 

这 种 情况 下 应 该 应 用 Decorator 模 式 。 在 这 种 模式 下 ， 你 围绕 一 个 核心 对 和 象 设计 一 群 包 状 类 ， 
也 就 是 所 谓 的 闻 饰 硕 ， 闭 饰 硕 的 接口 与 核心 对 象 相 同 。 凄 饰 希 可 在 对 象 级 别 动态 地 猴 上 或 拆 下 。 
Decorator 模 式 提 供 了 子 类 化 和 实现 继承 以 外 的 又 一 种 组 合 途径 。 还 有 很 多 种 结构 模式 和 行为 模 
式 ， 同 样 被 OO 程序 员 和 群体 用 于 设计 拥有 组 合 能 力 的 类 结构 。 





A.5.2 回归 语言 


随 看 时 间 推 移 ， 前 面 讨论 过 的 很 多 设计 模式 已 经 被 现代 的 O00 语言 和 函数 式 语言 纳入 为 语言 
特性 。A.3 节 就 提 到 过 ，Scala 和 Ruby 都 有 支持 基于 mixin 的 继承 的 内 置 。mixin 是 对 抽象 进行 组 合 
的 优秀 手段 ， 也 是 实现 多 重 继 承 的 正确 途径 。Scala 语 言 中 基于 对 象 的 mixin 特 性 ， 就 是 按照 
Decorator 模 式 实现 的 。 

除了 用 mixin 作 模块 化 的 组 合 ，Scala 的 高 级 类 型 系统 还 提供 了 其 他 一 些 机 制 ， 可 以 提高 抽象 
的 组 合 性 。 第 6 章 讨 论 用 Scala 作 为 实现 语言 设计 复 洒 领域 模型 时 ， 会 一 并 详 细 讨 论 。 本 市 重点 观 
察 编 程 语 言 日 趋 强 大 之 际 普 裔 呈现 的 发 展 趋 势 , 即 越 来 越 多 的 设计 模式 和 最 佳 实践 被 吸收 成 为 语 
言 实 现 的 一 部 分 。 

1. 基于 原型 的 OO 

有 一 种 形态 的 OO 并 不 包含 类 的 概念 ， 只 有 一 种 抽象 形式 一 一 对 象 一 一 用 作对 实体 行为 的 建 
模 手 段 。 如 采 想 共享 菏 些 行为 , 只 要 将 一 个 对 象 标 记 为 另 一 个 对 象 的 父 本 即 可 。 在 这 样 的 模型 中 ， 
不 存在 任何 静态 的 继承 层次 结构 ; 实现 继承 在 基于 类 的 OO 中 表现 出 来 的 固有 的 缺陷 都 消失 了 。 
JavaScript 就 米 用 这 种 基于 原型 的 OO 模型 ,而 我 们 之 前 讨论 那 种 OO 模型 称 为 基于 类 的 模型 。 我 们 
从 基于 原型 的 OO 语言 的 角度 ， 观 察 一 下 它们 是 如 何 处 理 对 象 的 组 合 问题 的 。 

在 下 面 的 JavaScript 例 子 里 ， 首 先 定 义 一 个 instrument 对 象 , 作为 所 有 其 他 票据 的 原型 式 对 
象 。 原型 式 的 意思 是 指 ins trument 对 象 充当 基础 的 角 色 , KAKA T 同样 契约 的 对 象 所 共 圣 。 
fixea_income 对 象 是 instrument 的 特 化 变 体 , 在 instrument 的 实现 之 上 增加 了 独特 的 行为 。 
在 实现 层面 ，fixedq_income 有 一 个 指针 指 回 它 的 父 对 象 ， 也 就 是 所 谓 的 原型 。 此 例 中 的 原型 是 
ijnstrument 对 和 象 。 

安排 以 上 结构 的 思路 并 不 难 理解 。 当 你 调用 对 和 象 的 某 个 方法 时 , 接 到 调用 请 求 的 对 象 把 这 个 
方法 (或 者 叫 消息 ) 与 它 目 身 的 契约 集 (或 者 叫 消 息 集 ) 进行 比 对 ， 如 采 找 不 到 匹配 的 消息 , 那 
么 就 将 消 且 转发 给 它 的 原型 ， 看 原型 是 否 能 啊 应 该 消 且 。 消 县 逐次 转发 给 上 一 级 的 原型 ， 下 到 成 
功 啊 应 或 者 到 达 特 殊 的 根 对 象 object 为 止 。 

通过 原型 来 实现 对 象 级 别 的 知识 共享 ， 叫 做 委托 (delegation )。 委 托 可 以 在 最 细小 的 粒度 层 
次 动态 地 组 合 抽象 。 

var instrument = ( 


( 
( 












































) 
) 


issue: function D offa 
closes function { //.. 


B aa 
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, , , , 将 该 对 象 的 原型 设 为 instrument 
var fixed income = Object.beget (instrument); 
fixed income.mature - function() ( //.. ) 


要 选择 最 合适 的 OO 形态 来 对 问题 进行 建 模 ， 而 且 绝 不 应 该 被 语言 束缚 住 手脚 。 
与 其 为 实现 设计 模式 而 编写 大 量 的 八股 代码 ， 不 如 把 眼光 放宽 一 点 ， 换 一 种 更 得 
力 的 语言 也 许 会 找到 更 简洁 的 出 路 。 


当 设 计 模 式 被 吸收 进 语 言 实现 之 后 , 呈现 出 来 的 结构 可 能 不 像 原先 那么 明显 , 很 可 能 已 经 和 
语言 融 为 一 体 ， 变 成 一 种 习惯 用 法 。Ruby 中 的 元 编程 就 是 很 好 的 例子 。 

2. 元 编程 〈 无 处 不 在 ) 

在 Java 中 实现 Builder 模 式 需 要 大 费 周 章 , 但 如 果 通 过 Ruby 元 编程 来 实现 , 却 只 是 一 种 自然 的 
习惯 用 法 .具体 例子 可 以 参考 Jim Weirich 利 用 Ruby 的 methodq_missing 特 性 巧妙 实现 的 一 个 XML 
标签 Builder (详情 可 参阅 http://github.com/jimweirich/builder/tree/master )。 类 似 地 ，Ruby 中 构造 
新 对 象 的 惯 稼 方式 ， 也 已 经 融合 了 DI 模 式 。Strategy 模 式 既 可 以 用 Ruby 的 模块 特性 直接 实现 ， 也 
可 以 利用 Ruby 在 运行 时 修改 类 实现 的 能 力 ， 动 态 地 实施 。 


A.5.3 副作用 和 组 合 性 


上 文 讨论 过 的 Command 设 计 模 式 还 有 一 些 方面 值得 继续 深入 探讨 。Command 模 式 对 用 户 动 
VET Y BER. 开发 者 得 以 将 多 种 动作 组 合成 更 高 层次 的 抽象 。 此 处 的 用 户 动 作 是 指 用 户 施 加 于 
对 象 以 期 产生 某 种 绪 采 的 动作 。 但 除了 实现 用 户 的 意图 外 , 动作 还 可 能 产生 另外 的 副作用 ， 例 如 
顺和 之 在 控制 台 打印 一 些 信息 、 癌 数据 库 发 出 写 入 请 求 、 抛 出 异常 ， 或 者 改变 某 些 全 局 状态 。 

副作用 的 结果 取决 于 过 往 历 史 一 一 对 银行 账户 执行 取款 动作 , 同时 会 有 更 新 余额 的 副作用 , 更 
新 的 结果 因 当 前 余额 而 异 。 你 不 能 贸然 忽略 程序 语句 解释 执行 的 顺序 , 也 不 能 假设 编译 器 一 定 不 会 
进行 语句 合并 、 结 末 绥 存 、 绥 求 值 之 类 的 优化 。 有 副作用 的 程序 不 容易 被 理解 ， 更 不 容易 分 析 。 

1. PAm MEH 

在 面向 对 象 编 程 实践 中 如 何 有 效 地 控制 副作用 呢 ? 答案 依旧 取决 于 近年 发 展 起 来 的 设计 模 
式 、 惯 用 法 以 及 最 住 实践 。 其 中 一 种 方案 叫做 命令 -查询 分 离 (Command-Query Separation ) 模式 ， 
这 是 Bertrand Meyer 在 设计 Eiffel 语 言 期 间 提出 的 ， 后 来 得 到 Martin Fowler 的 推广 〈 详情 可 参阅 
http://www.martinfowler.com/bliki/CommandQuerySeparation.html )。“ 碍 询 ” 被 限定 为 只 求 得 结果 
的 单纯 动作 ， 而 不 引起 任何 全 局 的 状态 变化 ， 也 不 产生 任何 副作用 。 相 对 地 ,“ 命 令 ” 只 以 产生 
副作用 为 目标 ,通常 牵涉 到 某 种 状态 的 变更 。 在 该 模式 下 ， 每 个 抽象 要 人 么 属于 一 种 查询 ， 要么 属 
于 一 种 命令 ,但 绝 不 可 两 者 兼 具 。 


i 副作用 不 可 组 合 。 运 用 Command-Query Separation 模 式 区 别 模型 中 的 查询 和 命令 ， 
如 此 方 能 有 效 和 学 握 所 有 产生 副作用 的 抽象 。 


中 数 式 编程 很 少 利 用 副作用 来 达到 目的 , 即使 有 必要 使 用 , 也 可 以 通过 一 部 分 语言 提供 的 特别 
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标注 ， 明确 地 声明 具体 将 产生 哪些 副作用 。 哨 数 式 语言 并 不 一 定 限制 副作用 , 但 Haskell 会 通过 它 的 
静态 类 型 系统 对 副作用 进行 约束 。 在 Haskell 里 不 允许 把 齐 副 作用 的 抽象 传递 给 要 求 纯 粹 性 的 因数 。 

2. Haskell 示 例 

前 面 我 们 一 直 用 对 象 来 实现 Command 模 式 的 建 模 , 现在 不 妨 尝 试用 了 浮 数 式 的 方式 来 实现 。 假 
设 我 们 的 任务 是 对 集合 中 的 每 个 元 素 依次 施用 f 函 数 和 g 函 数 。 如 果 按 照 A.5.1 节 的 实现 ， 我 们 先 
要 把 上 国 数 和 g 困 数 分 别 封装 成 两 个 命令 (也 许 封 装 成 图 数 对 象 的 形式 )， 然 后 用 这 两 个 命令 组 合 
成 一 个 宏 命 令 。 在 Haskell 里 完成 同样 的 任务 ， 则 要 简单 得 多 : 

map f (map g lst) 

map 是 Haskell 中 的 一 种 组 合子 〈combinator ), "Ed Zilzerp mr 263821 31] 98] a H3 P^ $e BER] 
一 个 国 数 。 在 上 面 的 代码 片段 中 ， 首 先 g 困 数 被 应 用 到 列表 1st 的 每 个 元 素 中 ， 生 成 一 个 作为 中 
间 结 末 的 列表 结构 。 外 层 的 map 再 对 中 间 结 末 列 表 中 的 每 个 元 素 应 用 f 困 数 ， 得 到 作为 最 后 输出 
结 采 的 列表 。 以 上 操作 符合 一 般 的 逻辑 ， 也 很 接近 前 面 Macrocommand 例 子 的 思路 。 

前 面 已 经 说 过 ，Haskell 是 一 种 纯 函数 式 语言 , 不 允许 将 种 副作用 的 函数 传递 到 要 求 纯粹 性 的 
地 方 。map 刚 好 是 一 种 只 接受 纯 子 数 的 组 合子 。 请 看 map 在 Haskell 语 言 中 的 类 型 定义 : 


Prelude» :t map 
map :: (a -> b) -> [a] -> [b] 


map 是 一 个 函数 , 接受 男 一 个 函数 (a->b) 和 一 个 列表 La 1 作为 输入 , MH RŽ (Ca 919) 分 别 
应 用 到 源 列 表 al 的 每 个 元 素 中 ， 生 成 万 一 个 列表 b 作为 结 末 。 当 我 们 让 map 调 用 或 g 困 数 时 ， 
除非 £E 和 g 部 是 没有 任何 副作用 的 纯 函 数 ， 否 则 编 详 从 会 拒绝 接受 。 而 又 因为 E 和 g 必 定 是 纯 钢 数 ， 
所 以 Haskell 编 详 硕 可 以 将 例子 中 的 调用 变换 成 等 价 的 map (f.g) 1st。 这 样 一 来 ， 原 先 的 分 步 
调用 ， 经 过 编 详 融 的 变换 ， 变 成 对 列表 中 的 元 素 调用 一 个 复合 函数 。 这 样 的 好 处 是 用 来 存放 中 间 
结 末 的 临时 数据 结构 完全 消失 不 见 了 。 纯 粹 性 的 保持 导致 结 末 具有 更 好 的 组 合 性 。 

想必 你 对 A.5.1 区 面 问 对 象 的 Command 模 式 实 现 如 何 处 理 副 作用 有 所 疑问 ， 更 想 知 道 在 
Haskell 的 纯粹 世界 中 怎样 完成 同样 的 事情 。Haskell 在 语言 层面 实现 了 Command-Query Separation 
Bü. ELA HAE 


f :: Int -> Int 
g :: Int -> IO Int 


FRŽOEAIRKZG, Ih EA Ee AR To PRAE AN UTE HIE Z, 
从 它 的 类 型 声明 就 可 以 看 出 来 。g 类 型 申明 它 返 回 一 个 动作 ， 该 动作 在 执行 的 时 候 会 有 副作用 ， 
该 动作 返回 一 个 Int 类 型 。g 函 数 也 许 会 从 stdin 或 者 数据 库 中 读 取 某 些 信息 , 也 许 会 修改 某 项 可 
变 的 状态 。 午 复 调 用 g 不 一 定 每 次 都 能 得 到 相同 的 结果 ， 结 果 取 决 于 动作 执行 的 历史 。Haskell 的 
类 型 系统 明确 地 强调 ，f 是 一 个 查询 ， 而 g 是 一 个 命令 。 

并 非 所 有 的 函数 式 语 言 部 像 Haskell 那 么 纯粹 。 大 部 分 了 数 式 语言 不 要 求 市 副作用 的 函数 在 签 
名 中 作 任 何 显 式 声明 。 但 这 一 点 并 不 影响 函数 式 编程 相 比 00 编 程 在 组 合 能 力 方 面 的 优势 。 捕 数 
式 编程 把 对 纯粹 性 的 追求 渗透 到 日 第 实践 之 中 , 程序 员 对 于 那样 的 写法 已 经 习惯 成 日 然 。 副作用 
放 在 函数 式 的 世界 会 被 当做 劳 门 左 道 ， 而 在 OO 世界 中 却 显得 很 目 然 。 




























































































A.5.4 组 合 性 与 并 发 


可 组 合 的 抽象 市 来 的 最 大 好 处 , 可 能 是 它们 为 并 发 编程 做 的 铺垫 。 如 采 现 在 让 你 设计 一 个 打 
算 在 多 线程 环境 下 运行 的 并 发 抽象 ,你 大 概 会 用 基于 锁 的 同步 机 制 来 完成 设计 。 设 计 中 要 考虑 并 
发 性 本 来 就 不 容易 ， 而 采用 基于 线程 的 执行 模型 ， 其 固有 的 不 确定 性 更 使 设计 难 上 加 难 。 基 于 锁 
的 并 发 控制 不 可 组 合 ; 在 锁 同 步 机 制 下 单独 具有 原子 性 的 操作 , 并 不 能 保证 组 合 之 后 仍然 满足 原 
子 性 。 难 怪 计 算 机 科学 领域 的 研究 者 要 竟 力 发 明 一 种 更 好 的 并 发 控制 抽象 。 

STM ( Software Transactional Memory， 软 件 事务 内 存 ) 是 已 经 被 Haskell、Clojure 等 语言 成 功 
实现 的 一 种 并 发 控制 结构 。STM 提 供 了 一 种 类 似 于 数据 库 事务 的 并 发 控制 机 制 , 可 以 代 符 锁 同 步 
机 制 完 成 程序 中 对 共享 内 存 的 访问 控制 。STM 的 首要 优点 , 是 赋予 你 把 原子 操作 组 合成 更 大 的 原 
子 操作 的 能 力 。 

让 我 们 用 一 段 Haskell 代 码 来 具体 说 明 。 下 面 的 片段 实现 了 在 两 个 银行 帐户 之 间 转 账 的 原子 操作 。 


transfer :: Account -> Account -> Int -> IO () 
transfer from to amount 


























= atomically (do { credit to amount 
; debit from amount ]) 


BI ERAI XS Haskellift ri. UL A XGCTHOB$8. xxERDUT ETE. AEA H 
dqeposit 和 withdqraw 这 两 个 原子 操作 在 Haskell 组 合子 atomicallvy 的 保障 下 ， 组 合成 一 个 更 大 
的 原子 操作 transfer。 

在 本 书 第 2 部 分 介绍 如 何 通 过 组 合子 实现 高 层次 抽象 时 ， 组 合 性 这 个 主题 将 会 反复 出 现 。 只 
有 当 你 能 够 组 合 抽象 ， 隔 离 副 作用 时 ， 改 善 抽象 的 表现 力 才 是 一 个 可 以 企及 的 目标 。 
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我 们 设计 DSL 时 ， 可 以 利用 语言 的 运行 时 说 施 或 编 详 时 设施 生成 最 终 的 代码 。 但 这 些 生 成 的 代码 
可 能 楷 复 之 极 ， 又 刻板 生 便 且 难 以 阅读 。 本 篇 附录 主要 探讨 一 些 适 合 于 DSL 设 计 的 帝 用 元 编程 技 
巧 ， 假 如 能 够 利用 好 它们 ， 将 非常 有 利于 提高 DSL 的 表现 力 和 简洁 度 。 


B.1 DSL 中 的 元 编程 


我 们 从 2.1 市 得 知 Groovy 语 言 具有 强大 的 元 编程 能 力 ， 用 它 实 现 的 DSL 的 表现 力 远 远 超过 相 
应 的 Java 实 现 。Groovy 和 Ruby 这 类 语言 允许 我 们 动态 地 调整 对 象 的 运行 时 行为 。 对 象 在 运行 期 间 
获得 的 各 种 机 能 使 其 语义 具备 非常 高 的 可 塑性 。 这 些 动 态 行 为 受 MOP ( MetaObject Protocol, JG 
对 象 协议 ) 文 配 ， 并 在 语言 的 运行 时 得 以 实现 (参见 B.3 市 文献 [5])。 语 言 的 元 对 象 协 议决 定 了 语 
言 各 构成 元 又 的 扩展 性 语义 。 下 面 对 编程 语言 的 MOP 做 进一步 的 解释 。 























定义 ”元 对 象 是 一 种 用 来 操纵 其 他 对 象 的 行为 的 抽象 。 有些 OOP 语 言 有 “元 类 ”的 概念 ， 由 其 
负责 各 种 类 的 创建 和 操作 。 为 了 履行 职责 ， 元 类 需要 保有 与 类 有 关 的 一 切 信 息 ， 如 类 型 、 
接口 、 方 法 、 扩 展 对 象 等 。 
语言 的 MOP 决 定 了 用 该 语言 写成 的 程序 的 扩展 性 语义 。 程 序 的 行为 取决 于 MOP ， 程 序 中 
哪些 内 容 在 编译 或 运行 时 会 被 扩展 也 取决 于 MOP。 


元 编程 可 以 通过 编写 程序 来 产生 新 的 程序 ， 也 能 改变 已 有 程序 的 行为 。 在 Ruby 和 Groovy 等 
OO 语言 里 ， 元 编程 能 够 扩展 既 有 的 对 象 模型 ， 它 通过 添加 钩子 来 改变 既 有 方法 甚至 类 的 行为 ， 
也 可 通过 运行 时 的 内 省 机 制 置 入 新 的 方法 、 属 性 或 模块 。 而 在 Lisp 等 语言 中 ， 则 以 宏 作 为 元 编程 
的 实现 手段 ， 在 编译 阶段 对 语言 进行 句法 层面 的 扩展 。 对 比 起 来 ，Groovy、Ruby 的 主要 元 编程 
实现 形式 是 运行 时 的 元 编程 ， 而 Lisp 的 元 编程 是 编译 时 的 元 编程 ， 且 不 会 引入 任何 额外 的 运行 时 
负担 (Groovy 及 Ruby 都 可 以 通过 库 来 实现 对 AST 的 显 式 操作 , 这 是 一 种 编译 时 元 编程 , 但 其 精美 
程度 不 可 与 Lisp 同 日 而 语 ， 其 原因 将 在 B.2 节 揭晓 。) Java 语 言 也 通过 标注 处 理 机 制 (annotation 
processing ) 和 面向 切面 编程 ( aspect-oriented programming, 简称 AOP ) 的 途径 实现 了 元 编程 能 力 ， 
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并 且 完 全 在 MOP 内 定义 其 扩展 机 制 。 

这 种 语言 能 用 代码 来 生成 代码 吗 ” 当 你 需要 决断 手 涉 的 语言 是 否 足 以 胜任 DSL 实 现时 , 必须 
要 问 自己 这 个 至 关 重 要 的 问题 。 元 编程 可 以 拓展 答 主 语言 的 语法 ， 使 之 癌 领 域 用 语 靠 扰 ， 用 在 
DSL 设 计 上 将 发 挥 极 大 的 威力 。 传 统 上 依赖 纯 内 艇 方式 实 现 DSL 语 义 的 静态 类 型 语言 ， 如 Haskell 
和 OCaml, 现在 也 分 别 通过 Template Haskell( http://www.haskell.org/th/ ) 和 MetaOCaml( http://www. 
metaocaml.org/ ) 进行 扩展 ， 并 提供 了 类 型 安全 的 编译 时 元 编程 机 制 。 

这 一 节 我 们 分 析 几 种 时 新 声言 的 基本 元 编程 能 力 及 其 在 DSL 设 计 中 的 作用 。 本 书 第 二 部 分 对 
这 些 元 编程 特性 一 一 进行 了 次 入 探讨 ， 同 时 提供 了 大 量 的 应 用 实例 。 




















B.1.1 DSL 实 现 中 的 运行 时 元 编程 


对 于 DSL 的 宿主 语言 来 说 , 是 否 支持 元 编程 这 种 语言 特性 为 什么 如 此 重要 ? 因为 元 编程 令 语 
言 拥 有 扩展 的 能 力 ， 如 果 我 们 用 一 种 可 扩展 的 语言 来 实现 DSL， 那 么 DSL 就 会 自动 地 获得 扩展 能 
力 。 空 口 白话 或 许 不 好 理解 ， 我 们 可 以 用 一 些 例子 来 辅助 说 明 什 么 是 所 谓 的 扩展 性 。 
图 B-1 显 示 了 一 种 支持 运行 时 元 编程 的 语言 的 DSL 执 行 模型 。 如 果 语言 的 MOP 人 允许 对 各 种 核 

心 语言 特性 进行 扩展 , 那么 我 们 可 以 在 DSL 实 现 中 利用 这 种 能 力 去 改变 和 扩展 一 众 关联 对 象 的 核 
心 行为 。 这 样 ，DSL 与 MOP 携 手 将 复杂 的 实现 隐藏 起 来 ， 从 而 使 表面 语法 得 以 保持 简洁 。 如 图 
B-1 所 示 ，DSL 脚 本 通过 DSL 实 现 的 解 译 ， 并 在 核心 语言 运行 时 及 语言 元 编程 行为 机 制 的 共同 作 
用 下 ， 最 终 完成 其 处 理 过 程 。 

紧凑 的 表面 语法 

e 精炼 























语言 MOP 


扩展 核心 对 象 的 途径 : 

。 拦截 方法 

。 合成 方法 

e 放置 钩子 
发 挥 MOP 的 作用 ， 动 。 (对 以 数据 形式 置 入 的 代码 ) 求 值 
态 改变 程序 的 行为 。 扩展 元 对 象 


图 B-1 语言 元 模型 在 DSL 执 行 中 承担 的 角色 
从 上 面 的 抽象 模型 中 , 我 们 可 以 了 解 元 编程 在 DSL 执 行 过 程 中 所 扮演 的 角色 。MOP 对 增强 语 
言 的 表现 力 有 着 举足轻重 的 的 作用 ， 我 们 可 以 通过 回顾 第 2 章 Groovy 实 现 的 交易 指令 处 理 DSL 来 
说 明 这 一 点 。 图 B-2 标 示 了 其 中 的 关键 点 。 
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mp 


Integer 动 态 注 和 方法 


newOrder.to.buy(100.shares.of('IBM') { 
limitPrice 300 
allOrNone true 
valueAs (qty, uniVXPrice -> qty * unitPrice - 500} 


} 
通过 methodMissing 合 成 方法 


动态 调用 闭 包 的 call () 方 法 
图 B-2” Groovy 实现 的 交易 指令 处 理 DSL 中 ， 元 编程 发 挥 作用 的 几 处 关键 点 
图 B-2 中 每 一 条 标注 指示 的 位 置 , 都 在 Groovy MOP 所 定义 的 元 编程 机 制 下 发 生 了 对 核心 语言 
抽 稼 的 动态 修改 或 扩展 。 这 些 修改 和 扩展 都 隐藏 于 DSL 实 现 之 内 ， 对 外 的 据 约 则 保持 催 济 精 发 ， 
并 且 不 增加 任何 非 本 质 复杂 性 。 














B.1.2 ”DSL 实现 中 的 编译 时 元 编程 


我 们 从 第 2 草 的 例子 中 得 项, Groovy MOP 通 过 扩展 核心 语言 的 语义 来 实现 在 运行 时 期 间 的 动 
态 程序 行为 。 代 码 生 成 、 方 法 合成 、 消 息 拦 截 这 些 动作 ， 都 是 在 程序 开始 执行 后 发 生 的 ， 这 意味 
着 Groovy 和 Ruby 的 所 有 元 对 象 都 是 语言 的 运行 时 产物 。 编 详 时 元 编程 允许 我 们 在 编译 期 间 构 造 
和 操纵 程序 。 我 们 可 以 定义 新 的 程序 构造 ， 操 作 编译 硕 完 成 语法 变换 ， 有 针对 性 地 对 应 用 进行 优 
化 。 编译 时 元 编程 的 这 些 能 力 , 恰好 完美 地 呼应 了 Steele 提 出 的 设想 (参见 B.3 市 文献 [6] ): “对 发 
展 的 规划 应 该 是 语言 设计 的 一 个 主要 目标 。” 的 确 ， 我 们 可 以 凭借 编译 时 元 编程 ， 让 语言 的 语法 
平滑 地 癌 看 需要 的 方 问 演变。 

语法 宏 ( syntactic macro ) 是 最 普通 的 一 种 编译 时 元 编程 形式 。 不 同 语言 的 安 在 复 杂 度 和 能 
力 上 有 很 大 的 差异 , 有 像 C 语 言 预 处 理 需 那样 简单 的 文本 式 的 宏 , 也 有 像 各 种 Lisp 变 体 和 Template 
Haskel、MetaOCaml 等 静态 类 型 语言 那样 在 AST 层 面 进行 操 作 的 精巧 的 宏 。 本 市 我 们 将 详细 探讨 
宏 及 编译 时 元 编程 的 某 些 能 力 ， 它 们 对 精 炬 DSL 的 设计 起 到 强大 的 推动 作用 。 

除了 宏 ， 有 些 语言 还 提供 其 他 依 徘 预 处 理 问 的 编译 时 元 编程 方式 ,例如 C++ 模 板 、 面 问 切 面 
编程 ( AOP ) 和 标注 处 理 机 制 。 像 Groovy 和 Scala 等 语言 ， 还 可 以 通过 显 式 实现 的 编译 需 插 件 ， 
以 操作 AST 的 方式 获得 一 些 元 编程 能 力 。 这 些 编译 时 元 编程 方式 我 们 会 在 下 文 一 一 谈 及 ,其 中 讨 
论 的 重点 是 以 Lisp 语 言 家 族 为 代表 的 基于 宏 的 方 采 。 

1. C++: 模板 

模板 是 C++ 语 言 首要 的 元 编程 机 制 。C++ 模 板 通 过 编译 时 期 间 对 数据 结构 的 操纵 ， 获 得 强大 
的 代码 生成 能 力 。 模板 这 种 编译 时 元 编程 形式 在 科学 和 数值 计算 方面 的 应 用 十 分 成 功 , 被 用 来 生 
成 算法 的 内 联 版 本 ， 并 运用 诸如 循环 展开 等 技巧 来 优化 算法 的 性 能 。 
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表达 式 模板 ( expression template ) 也 是 一 种 有 用 的 C++ 元 编程 技巧 ( 参见 B.3 节 文献 [1] )， 它 
可 以 有 效 地 蔡 代 C 风 格 的 回调 。 回 再 函数 不 可 避免 地 会 币 来 函数 调用 的 系统 开销 ， 而 表达 式 模板 
把 各 种 逻辑 和 代数 表达 式 直 接 内 联 在 吨 数 体内 ， 因 而 避免 了 相应 的 系统 开销 。C++ 数 组 处 理 类 库 
Blitz++ (参见 B.3 市 文献 [2] ) 就 运用 “表达 式 模板 ”的 技巧 来 建立 数组 运算 表达 式 的 语法 分 析 树 ， 
并 进而 产生 优化 的 定制 计算 内 核 。 将 这 种 能 够 在 编译 时 生成 代码 的 技巧 用 于 DSL 设 计时 , 我 们 可 
以 把 涉及 向 量 、 和 矩阵 等 高 阶 数据 结构 的 运算 代码 写成 下 面 的 样子 : 

Vector«double» result(20), x(20), y(20), z(20); 

result = (x + y) / Z; 


除了 通过 模板 的 实例 化 来 生成 代码 ，C++ 的 操作 符 重 载 也 是 一 种 原始 的 元 编程 形式 。 作 为 C 
语言 的 后 继 者 ，C++ 也 继承 了 C 语 言 的 宏 机 制 ， 由 一 个 位 于 编译 器 之 前 的 预 处 理 絮 来 负责 对 宏 的 
处 理 。 通 过 安 来 进行 编译 时 元 编程 的 ， 还 有 另外 一 群 语言 ， 也 就 是 我 们 下 一 节 要 谈 到 的 Lisp 语 言 
家 族 。 

2. Lisp 和 Clojure: Æ 

Lisp 的 安 机 制 提供 了 最 为 成 熟 完善 的 编译 时 元 编程 支持 。C 话 言 的 安 局 限于 文本 替换 操作 ， 
表现 力 匮乏 ; 相对 地 ，Lisp 的 宏 可 以 全 面 调动 语言 的 一 切 扩 展 能 

当 Lisp 表 达 式 含有 宏 调用 时 ,Lisp 编 译 器 不 对 调用 的 参数 进行 求 值 , 而 是 原样 传递 给 宏 代码 。 
宏 代码 经 过 人 处理， 返回 一 段 新 的 Lisp 语 言 成 分 来 人 蔡 换 处 理 前 的 宏 成 分 ， 然 后 编译 器 对 新 的 表达 式 
进行 求 值 。 对 宏 调 用 的 整个 转换 过 程 完全 在 编译 时 进行 ， 转换 产生 的 代码 完全 由 有 效 的 Lisp 语 言 
成 分 构成 ， 而 且 完 全 与 主 程序 的 AST 合 为 一 体 。 图 B-3 简 要 示意 了 Lisp 编 译 时 元 编程 机 制 的 构成 。 

S 表 达 式 









































读 取 程序 求 值 器 /编译 器 





转换 为 有 效 的 


Lisp 语 言 成 分 


代码 生成 宏 调 用 
K|B-3 ”Lisp 语言 通过 宏 来 提供 编译 时 元 编程 能 力 


除了 语法 宏 之 外 ，Common Lisp 语 言 还 有 很 多 天 生 就 适合 元 编程 的 特性 。 比 如 它 的 代码 和 数 
据 有 关 统 一 的 表达 形式 ， 它 的 递归 求 值 模型 ， 它 的 代码 由 表达 式 而 非 语 句 构 成 类似 这 样 的 语言 
特性 会 给 元 编程 市 来 很 大 的 便利 。 

Clojure ( http://www.clojure.org ) 是 一 种 由 Rich Hickey 开 发 的 ,在 JVM 上 的 Lisp 实 现 。Clojure 
也 像 Common Lisp 一 样 ， 通 过 语法 宏 来 进行 元 编程 。 由 于 Clojure 在 JVM 上 实现 ， 所 以 它 可 以 无 障 
但 地 与 Java 相 和 集成， 有 昌 具有 与 Java 对 象 互 操作 的 能 力 。 在 本 篇 余下 的 段落 ， 我 们 将 用 Clojure 代 码 
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片段 来 演示 Lisp 语 言 的 DSL 设 计 之 道 。 而 且 这 些 例 子 所 代表 的 编程 范式 ， 我 们 也 一 概 用 Lisp 来 称 
呼 。 因 为 说 到 底 ，Clojure 语 言 也 是 一 种 Lisp。Lisp 语 言 本 映 的 设计 就 恰好 满足 DSL 实 现 对 表现 力 
的 追求 ， 其 中 的 缘由 我 们 会 在 B.2 节 详 述 。 不 介意 的 话 ， 现 在 请 再 看 一 眼 图 B-3。 图 中 非常 简略 地 
描绘 了 预 编译 阶段 Lisp 宏 生成 代码 的 过 程 。 

现在 就 让 我 们 来 对 这 个 过 程 作 一 点 深入 的 探索 , 仔细 地 观察 安 展 开 过 程 中 , 变换 产生 最 终 的 
Lisp 成 分 ， 并 旦 被 编译 帮 求 值 的 每 一 个 步 纤 。 假 设 我 们 有 这 样 一 段 处 理 客户 交易 指令 的 DSL,， E 
的 任务 是 根据 某 些 条 件 ， 将 交易 指令 提交 给 交易 引擎 : 


(when (and (> (value order) 1000000) 
(is-premium-client? client)) 











(make-trade order broker) 
(update-journal client)) 


片段 中 的 when 是 一 个 安 ， 其 定义 如 下 : 


(defmacro when [test & body] 
(list "if test (cons 'do body))) 


H Lisp AnA $12; 38] HIE, EFRA RA n] UARIIS REWE TKE. less 
到 的 只 有 源 代 码 。 因 此 它 将 作为 源 代码 的 以 下 三 个 Lisp 列 表 ， 不 经 求 值 ， 原 样 地 传递 给 宏 : 


(and (> (value order) 1000000) (is-premium-client? client)) 





(make-trade order broker) 
(update-journal client) 


然后 编译 天 以 这 三 个 列表 成 分 为 实 参 运 行 宾 。 形 参 test 被 绑 定 为 列表 成 分 (and (> (value 
order) 1000000) (is-premium-client? client)), 而 男 外 的 (make-trade order 
broker) 和 (update-journal client) 成 分 则 被 绑 定 到 形 参 boqy。 于 是 在 宏 定 义 体 内 的 反 引 | 
号 表达 式 (backquote expression ) 作用 下 ， 宏 被 下 面 展 开 之 后 生成 的 新 代码 取而代之 : 


(if (and (> (value order) 1000000) 
(is-premium-client? client)) 
(do 
(make-trade order broker) 
(update-journal client))) 


Common Lisp 的 安 机 制 也 像 Groovy MOP 一 样 ， 存 在 一 个 代码 生成 的 过 程 ， 但 与 Groovy 不 同 
的 地 方 在 于 ， 这 个 过 程 发 生 在 预 编译 阶段 。 因 此 Lisp 运 行 时 绝对 不 会 遇见 任何 元 对 象 ， 在 它 面 前 
出 现 的 全 部 都 是 有 效 的 Lisp 成 分 。 

3. Java: 标注 处 理 机 制 和 AOP 

Java 也 拥有 一 定 程 度 的 编译 时 元 编程 能 力 ， 标 注 处 理 机 制 (annotation processing ) 和 面 问 切 
面 编程 ( AOP， 参 见 B.3 市 文献 [4] ) 是 它 实施 元 编程 的 两 个 途径 。Java 程 序 里 的 标注 会 在 程序 构 
建 时 得 到 处 理 ， 而 处 理 时 生成 的 代码 可 以 补充 或 修改 原本 的 程序 行为 。 

Aspect] (参见 B.3 节 文献 [3] ) 是 Java 语 言 的 AOP 扩 展 ， 它 有 一 套数 量 不 多 但 威力 强大 的 程序 
控制 结构 ， 可 以 插入 到 学 市 码 当 中 ， 从 而 癌 既 有 程序 注入 新 的 行为 。 我 们 可 以 指定 程序 执行 路 径 
中 某 些 明确 的 点 ， 称 为 连接 点 (join point )， 问 这 些 点 注入 含有 新 行为 定义 的 通知 ( advice )。 连 
接点 的 集合 称 为 切入 点 (pointeut )。 切 人 和 人 点、 通知 、 再 加 上 一 些 相关 的 Java 成 员 定义 ， 就 构成 了 
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AspectJ 的 模块 单元 切面 (aspect )。 切面 的 作用 是 在 特定 的 切入 点 上 生成 代码 ， 相 当 于 给 Java 增 加 
了 一 套 元 对 象 协议 。 在 Java 语 言 下 ,利用 切面 来 实现 有 限 形 态 的 DSL 是 可 行 的 。 例 如 Java EE 框 染 
的 代表 Spring( http://www.springframework.org ) 就 通过 这 种 途径 给 开发 者 提供 了 精干 的 领域 语言 ， 
算是 一 个 相当 成 功 的 范例 。 


B.2 ”作为 DSL 载 体 的 Lisp 


元 编程 和 代码 生成 可 以 造就 出 色 的 DSL 设 计 , 这 一 点 我 们 已 经 在 2.3 节 有 过 详细 的 叙述 . 用 户 
所 期 待 的 出 色 的 DSL 设 计 ， 除 了 表面 声 法 紧凑 外 ， 还 要 具备 充分 的 领域 词汇 表达 能 力 。 这 网 要求 
条 主语 言 必须 具备 充足 的 程序 转换 语义 ， 这 种 转换 可 在 编译 层面 进行 ， 也 可 在 运行 时 层面 进行 。 

我 们 从 2.3.1 市 得 彻 ，Groovy 等 语言 利用 运行 时 MOP 生 成 代码 ， 并 通过 诸如 方法 合成 、 方 法 
拦 鹤 等 元 对 象 操 纵 手 段 改 变 程序 的 行为 。 但 运行 时 元 编程 确实 存在 性 能 方面 的 产 病 ,因为 变换 涉 
及 的 程序 结构 需要 通过 元 对 象 的 反射 和 内 和 省 来 实施 操纵 。 

Lisp 等 语言 通过 语法 宏 来 提供 编 详 时 元 编程 能 力 ， 这 是 B.1 市 刚刚 讨论 过 的 。 正 是 由 于 语法 
安 的 功 务 ，Lisp 运 行 时 完全 摆脱 一 切 元 结构 ， 执 行 Lisp 程 序 时 只 需 考虑 核心 声言 运行 时 中 定义 的 
有 效 Lisp 语 法 成 分 即 可 。 这 个 特点 使 得 Lisp 元 编程 独树一帜 ， 也 使 得 语法 宏 成 为 实现 Lisp DSL 的 
根本 。 本 市 我 们 将 更 进一步 天 析 Lisp 程 序 的 构造 ， 以 图 理解 Lisp 在 实现 DSL 的 方法 上 与 其 他 语言 
的 区 别 。 


B.2.1 Lisp 的 特殊 之 处 


是 什么 原因 令 Java、C++ 这 类 语言 难以 实施 纺 详 时 元 编程 ? 要 想 有 效率 地 编 详 时 元 编程 ， 我 们 
需要 在 程序 的 AST 上 执行 各 种 变换 操作 。 下 面 的 内 容 大 致 说 明了 抽象 语法 树 和 具体 语法 树 的 含义 。 


在 大 多 数 语 言 里 ， 我 们 编写 的 程序 都 会 被 表示 成 一 哥 CST (Concrete Syntax Tree, 

具体 语法 树 ) CST 真 实地 反映 程序 内 容 ， 包 括 代 码 中 的 空白 、 注 释 以 及 编写 中 产 
生 的 一 切 元 人 信息。 然后， 程序 依次 经 过 扫描 器 、 词 法 分 析 器 、 语 法 分 析 器 的 处 理 ， 生 成 
所 谓 的 AST ( Abstract Syntax Tree， 抽 象 语 法 树 )。AST 代 表 了 经 过 一 系列 编译 阶段 ， 从 
程序 代码 中 提取 出 来 的 、 具 有 语法 意义 的 实质 部 分 。 从 CST 到 AST 一 般 要 经 历 变换 、 优 
化 、 代 码 生 成 等 步骤 ,所 有 这 些 变换 操作 都 主要 由 语言 的 语法 分 析 器 负责 实施 ， 变 换 的 
结果 是 产生 AST。 


大 多 数 语 言 如 Java 或 C++ 都 用 字符 串 来 表示 程序 ， 从 CST 产 生 AST 的 唯一 方法 是 通过 语法 分 
析 需 ， 而 语法 分 析 顺 只 能 分 析 有 效 的 语法 成 分 。 语 法 分 析 需 不 是 一 个 独立 的 模块 ,在 程序 的 预 编 
译 阶 段 并 没有 语法 分 析 顺 可 供 使 用 。( 这 个 说 法 并 不 完全 准确 。 现 在 有 的 语言 ,如 第 9 章 人 简略 提 到 
的 Template Haskell 和 MetaOCaml， 已 经 实现 了 基于 语法 宏 的 编译 时 元 编程 。 ) 于 是 ， 在 语法 分 析 
天 缺席 的 情况 下 , 这些 语言 如 末 要 处 理 程序 中 的 新 语法 或 者 进行 预 编译 时 的 程序 变换 ,就 只 能 通 
过 以 下 几 种 原始 的 手段 : 
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O 像 C 语 言 那 样 ， 依 靠 一 个 预 编 详 磊 来 进行 文本 荐 换 式 的 安 展 开 ; 

O 通过 (Java) 标注 或 者 ( C++ ) 模板 在 预 编译 阶段 选择 性 地 做 一 些 预 处 理 ; 

O 像 AspectJ 在 Java 语 言 下 进行 AOP 那 样 ， 在 字 市 码 中 间 插 入 男 外 的 指令 。 

有 C 语 言 痛 景 的 读者 ， 很 可 能 体会 过 使 用 文本 替换 式 的 宏 所 囊 来 的 混乱 、 痛 苗 和 小 心 疲 鹿 。 
C 语 言 宏 的 窒 迫 恰恰 反衬 出 Lisp 宏 的 高 明 。 语 法 的 扩展 性 从 一 开始 就 是 Lisp 的 设计 目标 ， 而 且 相 
天 的 支持 设施 也 已 经 贯 容 语言 的 整个 设计 过 程 。 当 Lisp 之 父 John McCarthy 决 定 这 种 语言 要 能 够 访 
问 其 目 身 的 抽象 场 法 时 ， 束 注定 它 会 成 为 现在 的 样子 。 

到 目前 为 止 ， 本 坑 基 本 都 在 谈论 安 。 它 操纵 AST， 将 新 的 语法 转换 成 基本 的 Lisp 成 分 。 宏 之 
所 以 能 够 成 为 Lisp 的 扩展 性 来 源 ， 归 根 结 底 ， 还 是 在 于 Lisp 语 言 本 里 的 设计 。 独 特 的 设计 哲学 逆 
造 了 Lisp 这 种 与 Java 和 C++ 稚 然 不 同 的 语言 ， 下 文 将 略 述 其 中 几 点 。 


B.2.2 ”代码 等 同 于 数据 


在 Lisp 语 言 里 ， 所 有 的 程序 都 是 一 个 列表 结构 ， 同 时 这 个 列表 结构 也 是 代码 本 号 的 AST。 这 
条 规则 导致 程序 代码 与 数据 的 具有 完全 相同 的 表达 形式 和 语法 。 如 果 再 推 而 广 之 , 让 语言 的 抽象 
语法 也 遵守 这 条 简单 的 设计 规则 , 那么 我 们 就 可 以 像 访问 代码 和 数据 一 样 访问 抽象 语法 , 而 显然 
这 抽象 语法 也 是 一 个 极为 简单 的 列表 。 我 们 用 Lisp 制 造 的 任何 元 程序 都 只 要 遵守 这 种 简单 的 、 统 
一 的 表达 形式 即 可 。 


B.2.8 ”数据 等 同 于 代码 


我 们 可 以 通过 Lisp 的 特殊 成 分 quote， 坚 不 费力 地 在 表示 代码 的 语言 构造 中 航 入 表示 数据 的 
构造 。Lisp 宏 即 为 这 种 用 法 思路 的 代表 例子 。 实 际 上 ，Lisp 将 它 数 据 等 同 于 代码 的 范式 做 了 进一步 的 
拓展 ， 形 成 一 种 可 用 于 编写 元 程序 的 完善 的 模板 机 制 。 这 种 机 制 在 Common Lisp 语 言 中 称 为 拟 引 用 
( quasiquotation )。Clojure 语 言 也 具备 同样 的 特性 ， 由 语法 引用 (syntax quote )、 解 引用 (unquote ) 
和 接合 解 引 用 ( splicing unquote ) 几 部 分 构成 。 我 们 可 以 看 下 面 的 例子 , 这 是 Clojure 域 言 中 defstruct 
宏 的 定义 : 


(defmacro defstruct 


















































[name & keys] 
"(def -name (create-struct -QGkeys))) 


语法 引用 由 反 引 号 OC Xm, BERI Lish SERIE bos o Je ATL ES, SCR 
与 一 般 的 引用 相同 。 但 是 我 们 可 以 在 被 施加 语法 引用 的 成 分 内 部 ， 用 解 引用 符号 (~ ) 指示 Lisp 
停止 对 指定 成 分 的 引用 ， 并 对 该 成 分 求 值 。Common Lisp 语 言 的 拟 引 用 也 具有 类 似 的 作用 ， 我 们 
可 以 用 它 来 定义 数据 模板 ， 其 中 一 部 分 数据 是 固定 的 ,而 为 一 些 数 据 则 是 计算 得 出 的 。 这 一 套 语 
言 特性 几乎 相当 于 在 Lisp 的 语法 里 内 艇 一 种 完整 的 模板 子 语言 。 

第 5 章 详细 介绍 了 元 编程 的 实践 ， 并 对 Lisp 这 种 对 代码 和 数据 一 视 同 仁 的 特性 进行 了 深入 探 
讨 。 如 采 你 还 没有 习惯 Lisp 的 各 种 编程 范式 ， 那 么 现在 可 以 停 下 来 ， 好 好 想象 一 下 这 种 特性 会 给 
代码 生成 市 来 怎样 的 精彩 和 活力 。 
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B.2.4 ” 简 蛙 到 只 分 析 列 表 结 构 的 语法 分 析 器 


Lisp 是 一 种 语法 极其 精 徇 的 语言 。Lisp 的 语法 分 析 右 之 所 以 如 此 简单 ， 是 因为 它 需 要 分 析 的 
就 只 有 列表 而 已 ! 无 论 是 数据 还 是 代码 ， 其 表达 的 语法 都 是 统一 的 列表 结构 。 甚 至 我 们 所 关心 的 
Lisp 宏 ， 其 宏 体 部 分 也 是 一 个 列表 结构 。 

具备 强大 编译 时 元 编程 能 力 的 Lisp， 是 一 种 同 像 ( homoiconic ) 的 语言 。 这 一 点 跟 Lisp 之 所 
以 具有 里 越 的 DSL 实 现 能 力 有 关系 吗 ? 管 案 很 简单 : 我 们 可 以 贯彻 Lisp 的 “ 同 像 ” 哲 学 ,把 DSL 
也 表达 成 一 个 列表 结构 ， 并 且 用 宏 来 组 织 DSL 中 出 现 的 重复 性 的 构造 和 模式 。 这 样 设计 出 来 的 
DSL 不 需要 任何 额外 的 语法 分 析 融 ， 可 以 将 一 切 都 交 给 Lisp 本 喘 的 霹 法 分 析 融 去 处 理 。 安 可 以 帮 
助 我 们 突破 Lisp 成 分 的 形式 限制 ， 折 展 出 新 的 语法 和 语义 ， 回 领域 用 语 靠 拢 。 图 B-4 形 象 地 说 明 
了 用 Lisp 语 言 作为 DSL 载 体 的 基本 思路 。 
































定义 [BE (homoiconic ) 这 个 笋 有 介 事 的 术语 ， 描 述 的 是 语言 的 一 种 性 质 。 如 果 一 种 语言 的 程 
序 ， 能 够 用 它 本 身 所 能 处 理 的 一 种 数据 结构 来 表示 ， 我 们 就 说 这 种 语言 是 “ 同 像 ”的 ， 
以 Lisp 为 例 ， 它 用 列表 这 种 结构 来 统一 地 表示 代码 和 数据 。 


PEE DSL 实 现 
转换 后 的 有 效 Lisp 语 言 成 分 po " 


Lisp 安 


十 


|] Lisp 语 言 成 分 | 
N | 


-~~ 一 一 






你 能 够 从 图 B-4 中 看 出 Lisp 是 怎样 集 外 部 DSL 和 内 部 DSL 于 一 身 的 吗 ? 一 方面 , DSL 里 面 含有 
外 部 语法 ,也 就 是 各 种 安 。 安 不 是 有 效 的 Lisp 成 分 。 一 一 方面 ， 我 们 不 需要 使 用 任何 外 部 的 分 析 
天 去 处 理 这 些 外 部 场 法 .列表 结构 串 起 了 所 有 的 环节 ,而且 Lisp 本 刁 的 语法 分 析 融 就 是 万 能 的 DSL 
处 理 硕 。 我 们 在 此 讨论 的 Lisp 语 言 的 众多 特点 几乎 使 它 成 为 一 种 完美 的 DSL 实 现 语言 。 

元 编程 是 让 我 们 通过 编写 程序 来 编写 程序 的 一 种 技术 。Lisp 用 它 的 编译 时 宏 机 制 来 实现 元 编 
程 。B.1 市 是 对 编译 时 元 编程 的 全 面 综 述 ， 而 本 广 则 针对 Lisp 这 种 最 早 具 备 元 编程 能 力 的 语言 之 
一 ， 讨 论 了 该 语言 下 的 具体 实现 。 只 有 对 “元 ”的 力量 有 了 透彻 的 理解 ， 我 们 才能 在 现实 的 DSL 
实现 中 得 心 应 手 地 运用 这 种 范式 ,并 领略 其 中 的 妙 处 。 第 4 草 和 第 $ 章 准备 了 大 量 动态 语言 的 的 编 
译 时 和 运行 时 元 编程 例子 ， 所 用 语言 包括 Ruby、Groovy 和 Clojure。 
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本 篇 附录 将 帮助 你 融 悉 Ruby 语 言 中 有 助 于 DSL 开 发 的 一 些 特 性 。 请 不 要 把 本 附录 看 作 一 篇 细致 
而 全 面 的 语言 综述 .如 末 硕 望 完整 而 详细 地 探讨 Ruby 语 言及 其 语法 ,可 以 参阅 C.2 节 所 列 的 文献 质料 。 











C.1 _ Ruby 语言 的 DSL 相 关 特 性 








Ruby 是 一 种 动态 类 型 的 OO 语言 ， 它 的 反射 式 元 编程 和 生成 式 元 编程 能 力 都 非常 剖 。Ruby 的 





对 象 模型 允许 我 们 通过 对 元 模型 的 反射 , 在 运行 时 改变 对 象 的 行为 。 它 在 运行 时 生成 代码 的 元 编 


程 能 


实现 语言 的 重要 特性 。 





表 C-1 


， 也 可 以 被 我 们 用 来 精简 DSL 的 表面 语法 。 表 C-1 简 要 概括 了 那些 令 Ruby 成 为 优秀 的 DSL 


Ruby 语 言 特性 汇总 


类 和 对 象 


Ruby 是 面 回 对 象 的 语言 。 我 们 可 以 定义 类 以 及 类 中 的 实例 
变量 和 方法 

一 个 Ruby 对 象 拥有 一 组 实例 变量 ， 并 与 一 个 类 关联 

一 个 Ruby 类 是 class 类 的 实例 。 它 除了 拥有 对 和 象 所 拥有 
的 一 切 ， 还 含有 一 组 方法 定义 ， 以 及 指 回 超 类 的 一 个 
引用 

我 们 在 使 用 Ruby 语 言 设 计 DSL 时 , 用 类 来 建 模 领 域 实 体 是 
一 种 惯 第 的 做 法 


class Account 
ef initialize(no, name) 
@no = no 


@name = name 


def to s 


"Account no: #{@no} name: #{@name}" 


end 
end 


initialize 是 一 个 特殊 的 方法 ,会 在 我 们 调用 Account . 
new 时 被 执行 。 它 的 作用 是 在 对 象 获得 初始 内 存 分 配 之 后 ， 
设置 好 对 象 的 状态 

eno 和 ename 设 置 类 的 实例 变量 。 变 量 使 用 之 前 不 必 事 先 
声明 








单 例 Csingleton) 


我 们 可 以 定义 只 针对 单一 特定 对 象 的 方法 ， 是 为 单 例 方法 。 
Ruby 类 中 的 方法 定义 其 实 也 都 是 一 些 单 合 方 法 而 已 ,它们 
是 针对 某 个 class 类 的 实例 而 定义 的 。Ruby 的 单 例 也 称 为 


accnt = Account.new(12, "john p. ") 
def accnt.do special 
d 
end 
accnt.do special ## runs 
acc = Account.new(23, "peter s. ") 


acc.do special ## 错误 | 
do_special 方 法 只 针对 accnt 实 例 定义 。 寿 在 这 个 单 例 
方法 内 引用 self， 将 会 指 问 accnt 实 例 


IL 
元 编程 是 Ruby DSL 成 功 的 秘诀 。Ruby 是 一 种 具有 反射 能 
力 的 语言 ， 允 许 我 们 接触 运行 时 的 元 对 象 并 改变 其 行为 
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编 程 


class Account 


attr accessor :no, :name 


end 
attr_accessor 是 一 个 运用 了 反射 式 运行 时 元 编程 手法 
的 类 方法 。 它 会 为 参数 中 输入 的 属性 生成 相应 的 读 写 访问 
方法 。 这 个 例子 充分 展示 了 元 编程 对 于 表面 语法 的 精简 效 
果 ， 那 些 刻 板 机 械 的 部 分 都 被 放 到 运行 时 去 生成 

class Trade < ActiveRecord::Base 


has many 
end 


这 个 例子 用 到 了 Rails 的 ActiveRecord 库 。 这 里 用 了 一 个 
类 方法 来 表达 实体 间 的 一 对 多 关系 , 且 在 施加 该 关系 的 时 
候 运 用 了 反射 式 元 编程 

















:tax fees 





F 放 类 


Ruby 人 允许 我 们 在 运行 时 打开 任何 类 ,并 在 其 中 增加 或 修改 
属性 、 方 法 等 

这 个 特性 被 通俗 地 称 作 猴子 补丁 ,一般 认 为 它 是 Ruby 最 为 
强大 而 又 危险 的 特性 之 一 

猴子 补丁 的 作用 范围 是 全 局 命名 空间 , 因此 我 们 必须 并 慎 
地 使 用 该 特性 








class Integer 
def shares 
dd 
end 
end 


Ruby 的 开放 类 可 以 用 来 设计 一 些 辅助 性 的 成 分 ， 为 DSL 
的 语法 构造 提供 便利 。 例 如 我 们 可 以 打开 Integer 类 ， 
并 回 其 中 加 入 shares 方 法 。 这 样 DSL 的 用 户 就 可 以 按照 
平 第 的 说 话 习 惯 ,， 把 代码 写成 2 shares。 这 样 做 的 缺点 
是 所 有 Integer 类 的 使 用 者 都 会 被 该 猴子 补丁 所 影响 。 
请 务必 小 心 这 一 点 





求 值 操作 





Ruby 可 以 在 程序 执行 中 间 随 时 分 析 、 执 行 一 个 字符 串 或 者 

代码 块 。 求 值 操作 是 最 有 力 的 Ruby 元 编程 特性 之 一 

我 们 可 以 利用 Ruby 的 几 种 求 值 操作 来 设置 适当 的 执行 上 

下 文 。 假如 我 们 传递 的 代码 块 不 需要 在 调用 方法 的 时 候 明 

确 指 定 执 行 的 上 下 文 ， 那么 DSL 的 语法 也 会 显得 简洁 

一 些 

Ruby 的 几 种 求 值 操作 分 别 可 以 设置 不 同 的 执行 上 下 文 

m class_eval 一 一 在 一 个 类 或 者 一 个 模块 的 上 下 文 内 求 
值 一 个 字符 串 或 代码 块 

在 一 个 类 实例 的 上 下 文 内 求 值 一 











BH instance eval 


个 字符 串 或 代码 块 
eval 一 一 在 当前 上 下 文 内 求 值 一 个 字符 串 或 代码 块 


模 
模块 的 作用 是 把 一 些 相关 的 程序 制品 ， 如 方法 、 类 等 组 织 
在 一 起 ， 方 便 作 为 一 个 mixin 组 件 混入 到 类 
模块 在 Ruby 语 言 中 还 起 到 命名 空间 的 作用 


class Account 
end 
Account.class eval do 
def open 
did 
end 
end 


这 里 的 上 下 文 是 Account 类 o Clas s_eval 将 在 Account 
类 上 创建 一 个 实例 方法 


Account.instance eval do 
def open 
gd 
end 
end 


这 里 的 上 下 文 是 self 所 指 的 单 例 类 。 instance_eval 将 
在 Account 上 产生 一 个 单 例 方 法 〈 或 者 叫做 类 方法 ) 


块 
module Audit 
def record 
d 
end 
end 
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( & ) 
块 
这 个 模块 定义 了 一 个 新 的 命名 空间 来 收纳 所 有 与 审计 相 
关 的 方法 。 我 们 希望 哪个 类 具有 审计 功能 , 就 把 它 混入 哪 
个 类 : 


class Account 
include Audit 


## 此 处 可 使 用 record 方 法 


end 


代码 块 (block) 





Ruby 的 代码 块 是 一 种 代码 的 构造 单元 ,有 点 类 似 于 匿名 方 
法 ,可 适时 经 过 具体 化 (reification ) 之 后 执行 。 它 也 像 方 
法 一 样 可 以 接受 参数 输入 

Ruby 的 代码 块 是 lambda 的 同义词 ,可 以 用 来 实现 高 阶 孙 数 





sum = 0 

[1, 2, 3, 4].each do |value| 
sum += (value * value) 

end 


puts sum 
竖 线 括 起 来 的 |value| 即 是 传递 给 代码 块 的 参数 
Ruby 数 组 的 each 方 法 接受 一 个 代码 块 作为 它 的 参数 


用 散 列 充当 变 长 参数 列表 


Ruby 可 以 很 方便 地 实现 不 确定 长 度 的 方法 参数 列表 

我 们 只 需要 用 一 个 散 列 结构 来 充当 传递 的 媒介 , 然后 按照 
键 值 对 的 方式 访问 里 面 的 参数 

这 种 手法 可 以 提高 DSL 代 码 的 可 读 性 ， 同 时 令 Builder 模 式 
的 实现 变 得 极为 简单 








def foo(values) 
## valued 是 一 个 散 列 
end 


函数 的 调用 方法 : 
sps 2) 
这 种 惯用 法 的 应 用 示例 : 


class Trade 
has many :tax fees, 
:class name => "TaxFee", 
:conditions => "eld flag = 1", 


foo(:a => 1, 


:order => "name" 
end 
鸭子 类 型 
在 Ruby 语 言 里 , 我 们 基于 类 型 来 设计 抽象 , 而 是 基于 抽象 class Duck 
所 响应 的 消息 。 如 果 一 个 对 象 响应 表示 鸭子 叫 的 auack 消 “ye 
Ei , 那么 它 就 是 -H HS F! end 
MEO 一 ` yr u N v JA end 
这 种 写法 在 Java 语 言 里 是 行 不 通 的 。 Java 语 言 要 求 我 们 给 class DummyDuck 
方法 的 参数 指定 明确 的 类 型 def quack 
## 
end 
end 


def check_if_quack (duck) 
duck.quack 
end 


不 管 参数 中 输入 的 实例 属于 Duck 类 还 是 pummyDuck 类 , 
check_if_quack 方 法 都 能 得 到 正确 的 结果 ,因为 两 者 都 
啊 应 Guack 消 息 
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本 篇 附录 将 帮助 你 熟悉 Scala 语 言 中 有 助 于 DSL 开 发 的 一 些 特性 。 请 不 要 把 本 附录 看 作 一 篇 细 
致 而 全 面 的 语言 综述 。 如 采 布 望 完整 而 详细 地 探讨 Scala 语 言及 其 语法 ， 可 以 参阅 D.2 玉 所 列 的 文 
献 资 料 。 














D.1 Scala 语言 的 DSL 相 关 特 性 


Scala 是 一 种 在 JVM 上 运行 的 , 兼 有 面 癌 对 象 和 函数 式 编程 儿 式 的 语言 。 H F Scala Java 
对 象 模 型 〈 以 及 很 多 其 他 方面 )， 所 以 两 者 的 互 操作 性 十 分 优秀 。Scala 的 语法 人 简练 优 关 ， 具 有 类 
型 推 斯 能力， 还 因为 综合 了 OO 和 因数 式 两 种 犯 式 ， 因 而 拥有 十 分 丰 军 的 抽象 设计 机 制 。 
表 D-1 ”Scala 语言 特性 汇总 
基于 类 的 OOP 





Scala 是 一 种 面 癌 对 和 象 的 语言 我们 可 以 定义 含有 实例 变量 
和 方法 的 类 。, 除了 类 之 外 ,Scala 还 有 很 多 其 他 的 表示 类 型 
的 语言 构造 适合 用 于 抽象 设计 , 而 且 每 一 种 都 有 其 自身 的 
特点 和 应 用 范围 。 本 篇 附录 会 尽量 介绍 它们 

按照 Scala DSL 设 计 的 一 般 习 惯 ， 无 论 类 还 是 别 的 能 够 把 
若干 相关 功能 组 织 成 一 体 的 语言 构造 , 都 常常 被 用 来 建 模 
领域 实体 

类 定义 语法 的 详情 请 参阅 D.2 市 文献 [1] 





class Account(val no: Int, val name: 
String) d 
def balance: 
// 实现 
} 
Vy A 


} 

类 的 定义 可 以 加 上 参数 ,在 上 面 的 代码 片段 中 , no 和 name 
前 面 的 val 意 味 着 它们 都 是 不 可 变 的 ， 不 允许 再 次 赋值 
balance 是 一 个 方法 。 它 没有 任何 参数 ,返回 值 类 型 为 Int 


Int = i 








case 类 


只 要 类 定义 前 面 加 上 case 字 样 ， 编 译 费 就 会 生成 一 种 附带 

诸多 福利 的 抽象 ,这 种 抽象 Scala 称 为 case 类 。 对 于 一 个 case 

类 ， 编 译 需 会 自动 施行 以 下 动作 

m 转换 构造 器 的 参数 为 不 可 变 的 val。 不 希望 被 转换 的 参 
数 可 明确 标明 为 var 

m 为 该 类 实现 equals、hnashCode 和 和 toString 方法 

m 允许 使 用 简写 形式 来 调用 构造 器 ,初始 化 该 类 的 一 个 对 
象 时 ， 不 需要 写 出 new 关 键 字 。 编 译 器 会 产生 一 个 伴随 
对 象 , 含有 用 来 构造 对 象 的 apply 0 方法 和 提取 构造 参 
数 的 





abstract class Term 
case class Var (name: String) 
extends Term 

case class Fun(arg: String, body: 


Term) extends Term 


按照 这 段 case 类 定义 ， 我 们 可 以 用 val p = var("p") 的 
写法 来 实例 化 一 个 对 象 ， 不 需要 明确 写 出 new 关 键 字 
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ZH 


case 类 


unapply () Jj iE 

case 类 的 另 一 个 作用 是 参与 模式 匹配 。 它 最 党 也 最 习惯 被 
用 来 实现 一 些 参 与 代数 运算 的 数据 类 型 

由 于 case 类 天 然 地 具有 各 方面 的 不 可 变 特征 ， 我 们 在 设计 
DSL 的 时 候 常 第 用 它 来 实现 不 可 变 的 值 对 象 








trait 


trait 也 是 Scala 表 达 抽 和 象 的 一 种 手段 。 它 和 Java 的 接口 
( interface ) 类 似 ， 人 允许 将 具体 的 实现 留 给 具体 类 去 完成 。 
但 trait 有 一 点 和 接口 不 一 样 ， 它 可 以 选择 性 地 给 一 部 分 方 
法 提供 默认 的 实现 

trait 是 Scala 实 现 mixin 的 机 制 ,也 提供 了 一 条 正确 实现 多 重 
继承 的 途径 








trait Audit ( 

def record trail ( 

// 实现 

j 

def view trail // 保持 开放 
} 
class SavingsAccount extends Account 
with Audit { 

1 wes 
} 


trait 善 于 设计 开放 的 、 不 绑 定 到 特定 实现 的 、 可 重用 的 抽 
象 。 在 上 面 的 trait 定 义 里 ，view_trail 方 法 保持 开放 的 


状态 ， 留 待 混入 该 trait 的 抽象 去 实现 
高 阶 函 数 和 闭 包 
在 Scala 语 言 里 , 羡 数 与 其 他 的 可 作为 值 传递 的 类 型 完全 平 val hasLower = 
等 , 我 们 可 以 把 一 个 函数 作为 参数 传递 给 另 一 个 函数 。 函 bookTitle.exists(-.isLowerCase) 
def foo(bar: (Int, Int)-»Int) { 


数 也 可 以 返回 另 一 个 函数 。 函 数 和 值 的 等 同性 赋予 了 Scala 
实施 函数 式 编 程 的 强大 能 

高 阶 函数 可 以 精简 代码 , 且 便 于 我 们 在 DSL 中 表达 正确 的 
动词 语义 

闭 包 能 让 我 们 少 写 一 些 类 和 对 象 , 多 用 孔 数 式 的 程序 构造 


Sa 
} 
第 一 个 例子 的 exists 方 法 通过 它 的 参数 获得 一 个 子 数 来 
处 理 字符 串 中 的 每 一 个 字符 。 如 果 用 Java 语 言 来 实现 同样 
的 功能 将 会 烦琐 很 多 
第 二 个 例子 演示 了 Scala 的 函数 字面 量 ( function literal ) 语 
DE 





模式 匹配 


Scala 也 拥有 哺 数 式 编程 语言 必 备 的 模式 匹配 功能 。 我 们 可 
以 匹配 任意 的 表达 式 , 匹配 过 程 会 在 找到 第 一 个 匹配 项 时 
成 功 结束 ， 即 以 顺序 为 优先 ( first-match-wins ) 的 匹配 
规则 

我 们 在 Scala 语 言 下 施展 函数 式 的 编程 手法 ,case 类 和 模式 
匹配 的 组 合 可 以 说 是 杀手 铜 

Case 类 可 以 用 来 实现 可 扩展 的 Visitor 模 式 

我 们 从 第 6 章 的 例子 可 以 体会 到 ， 模 式 匹 配 是 清晰 表达 业 
5 AUI BERI 





def foo(i: Int) = 
case 10 => //.. 


i match { 


case 12 => //.. 
ase c => 
j 
这 上段 代码 使 用 Scala 的 语法 简单 复制 了 Java 语 言 的 
Switchy/case 语 句 。 其 实 模式 匹配 还 有 很 多 别 的 用 法 
val obj = dostuttrt) 


obj match { 
Case x:Foo => x 


var cast:Foo - 


case _ => null 


} 
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( 续 ) 


模式 匹配 


Java 语 言 下 的 instance0of 检 查 ， 按 Scala 的 习惯 一 般 会 写 
成 上 面 的 样子 


trait Account 


case class Checking(no: Int) extends 
Account 

case class Savings (no: Int, rate: 
Double) extends Account 

def process (acc: Account) = acc match 


{ 
case Checking(no) => // 执行 操作 
case Savings (no, rt) => // 执行 操作 
} 
Case 类 可 直接 用 于 模式 匹配 。Case 类 默认 实现 的 属性 提取 
yy (extractor ) 在 匹配 过 程 中 起 到 重要 作用 





起 模块 作用 的 object 语 法 


Scala 的 object 语 法 定义 了 一 种 可 执行 的 模块 。 我 们 使 用 
类 和 trait 定 义 好 的 各 种 抽象 , 通过 object 语 法 把 它们 组 合 
为 一 个 具体 的 对 象 实体 ,Java 语 言 中 与 object 语 法 最 为 接 
近 的 对 应 物 是 静态 内 部 类 





EE 





我 们 可 以 将 函数 的 最 后 一 个 参数 声明 为 implicit， 从 而 
达到 调用 时 省 略 该 参数 的 目的 ,编译 器 会 在 包围 该 函数 的 
作用 域内 查找 匹配 的 参数 





object RuleComponent extends Rule 
with CountryLocale with Calendar { 
Pas 

】 


Rulecomponent 是 用 声明 中 所 列 抽象 组 合 而 成 的 一 个 单 
例 对 象 


参数 


def shout(at: 
String) { 


String) (implicit curse: 


printin("hey: " + at + " " + curse) 
} 


implicit val curse = 
shout ("Rob") 


如 果 无 法 在 作用 域内 找到 匹配 的 参数 , 编译 器 将 提示 编译 
错误 


"Damn! 


隐 式 类 型 转换 





隐 式 类 型 转换 可 以 帮助 我 们 在 不 对 现 有 库 进行 任何 改动 
的 前 提 下 , 实现 对 该 库 的 扩展 。 其 原理 类 似 于 Ruby 的 猴子 
补丁 ,但 多 了 词法 作用 域 的 约束 

Martin Odersky 把 这 种 手法 称 为 Pimp My Library 模 式 ( 参 
见 D.2 节 文献 [2] ) 

编译 带 会 在 需要 的 时 候 自 动 调用 隐 式 转换 子 数 ,我 们 可 以 
利用 隐 式 类 型 转换 让 旧 的 抽象 适应 新 的 API 








class RichArray[T](value: Array[T]) ( 
def append(other: Array[T]) 
: Array[T] = 1 
// 实现 


} 

implicit def enrichArray[T] (xs: 

Array[T]) = new RichArray[T] 

ix HEX mimplicitoegÉ-EHJenricharrayPRZk, Je 
一 个 从 Array 类 型 到 RichArray 类 型 的 转换 函数 
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( £) 
ím HS XN 
Án PC EOGEELASUSTA n] BERUA P A — ABAE Xo Scala val onlyTrue: 
的 偏 函 数 形式 上 呈现 为 含有 一 连 串 case 语 句 的 模式 匹配 PartialFunction[lBoolean, Int] = { 
代码 块 case true => 100 
习惯 上 我 们 常常 把 Scala actor 的 消息 接收 循环 定义 成 偏 
onlyTrue 是 一 个 限定 了 参数 取 值 范围 的 PartialFunc- 
E: 


tion, © H £F Xf Boolean fH X true IS fi ALE Xo 
PartialFunction trait 含 有 isDefineqAt 方 法 ， 会 在 
参数 取 值 满足 偏 洱 数 定义 域 的 时 候 返 回 true。 以 下 是 两 
个 例子 : 


scala» onlyTrue isDefinedAt(true) 
resi: Boolean = true 
scala» onlyTrue isDefinedAt(false) 
res2: Boolean - false 
泛 型 和 类 型 参数 
Scala 人 允许 在 类 和 方法 的 声明 中 指定 类 型 参数 ,而 且 我 们 还 class Trade[Account <: 
可 以 对 这 些 类 型 显示 指定 一 些 抽象 必须 满足 的 约束 条 件 。  TradingAccount] (account: Account) ( 


对 约束 条 件 的 检查 将 由 编译 器 自动 执行 , 我 们 无 需 自 行 编 “人 …: 

写 任何 验证 代码 ee 
按照 这 里 的 类 定义 , 不 满足 约束 条 件 的 账户 将 无 法 生成 相 
我 们 设计 DSL 时 , 可 以 善 加 利用 Scala 语 言 的 特点 , 尽量 把 ”应 的 mrade 实 例 

DSL 的 约束 条 件 纳 入 其 类 型 系统 


D.2 参考 文献 


[1] Wampler, Dean, and Alex Payne. 2009. Programming Scala: Scalability = Functional Programming 
+ Objects. O'Reilly Media. 

[2] Odersky, Martin. Pimp My Library. Artima Developer. http://www.artima.com/weblogs/viewpost. 
Jsp?thread-1 79766. 


























本 篇 附录 将 帮助 你 熟悉 Groovy 语 言 中 有 助 于 DSL 开 发 的 一 些 特性 。 请 不 要 把 本 附录 看 作 一 篇 
细致 而 全 面 的 语言 综述 。 如 果 和 希望 完整 而 详细 地 探讨 Groovy 语 言及 其 语法 ， 可 以 参阅 E.2 节 所 列 
的 文献 资料 。 


E.1 Groovy 语 言 的 DSL 相 关 特 性 


Groovy 是 一 种 动态 类 型 的 OO 语言 ， 拥 有 强大 的 反射 式 元 编程 和 生成 式 元 编程 能 力 。Groovy 
与 Java 语 言 共 至 对 象 模 型 ,因此 它们 之 间 的 互 操 作 性 十 分 优秀 。Groovy 还 可 以 作为 一 种 脚本 语言 
使 用 。Groovy 比 较 重 要 的 语言 特性 包括 可 选 的 类 型 声明 、 运 算 符 重 载 、 便 捷 丰 富 的 字面 量 语法 ， 
以 及 闭 包 等 困 数 式 抽象 。 表 E-1 人 简要 概括 了 那些 令 Groovy 成 为 一 种 优秀 的 DSL 实 现 语言 的 重要 
特性 。 











表 E-1 Groovy 语言 特性 汇总 





基于 类 的 OOP 
Groovy 是 一 种 面向 对 象 的 语言 ,我 们 可 以 定义 类 以 及 类 中 class Account { 
的 实例 变量 和 方法 。 类 的 定义 语法 与 Java 类 似 ， 不 过 省 略 Integer balance(Date date) = ( 
不 写 的 可 见 性 修饰 符 会 被 默认 为 public。 类 定义 语法 的 详 idis 
情 请 参阅 E.2 节 文献 [1] a 


} 
上 面 是 Groovy 类 的 声明 片段 
可 选 的 类 型 声明 
我 们 可 以 像 使 用 Java 语 言 那样 静态 地 为 运行 时 声明 类 型 ;String str = new String("Groovy"); 
也 可 以 用 aef 关 键 字 来 代替 类 型 声明 ， 从 而 获得 像 Python str = 8 
语言 那样 的 动态 类 型 效果 。 方 法 和 闭 包 的 形 参 甚至 连 def 
区 "e E def dstr = "dynamic" 








str 将 被 赋值 String 类 型 的 the String 8 


ds tr 将 被 赋值 Integer 类 型 的 the Integer 20 
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(2E) 
属 性 
不 管 什么 类 型 的 字段 , 只 要 省 略 不 写 该 字段 的 可 见 性 修饰 class Foo ( 
符 ， 就 相当 于 声明 了 一 个 属性 PETIN duds 
def dyn 
} 
这 是 一 个 含有 属性 的 类 
字 符 m 
我 们 可 以 定义 单行 的 字符 串 、 多 行 的 字符 串 ， 以 及 可 以 内 poii cc o ESL 
Lia y AA "cst : def multi 一 "mnm iX PTT "n nw 
Hik a ETRS E def gstring = "$single 一 共有 ${single.size} 个 
Tt 
这 段 代 码 展示 了 Groovy 支 持 的 几 种 字符 串 
集合 数据 类 型 
Groovy 提 供 了 各 种 常用 的 集合 数据 类 型 ， 如 Range、List、 // CPF) EH 
Map， 等 等 。 它 们 各 自 都 有 十 分 简便 的 字面 量 定义 语法 ， (0 .<10) ,each ( println it ) 
MM : // 各 种 列表 操作 
尤其 适合 用 DSL 脚 本 
[1273] * 2 -== [1;2;3;1;2;3] 
[1, [2,3]].flatten() == [1,2,3] 
[1,2,3] .reverse() == [3,2,1] 
[1,2,3] .disjoint([4,5,6]) == true 


// map 定 义 的 字面 量 语法 

def map = [a:0, b:1] 

上 面 是 Groovy 语 言 中 各 种 集合 数据 类 型 的 例子 

m å g 

闭 包 是 一 种 可 以 在 适当 时 机 具体 化 (reification ) 之 后 执行 def clos = { printin "hello world!" } 
的 代码 块 。 闭 包 内 封装 了 一 段 巡 辑 , 也 封装 了 包围 这 段 届 。 c108 0 // MURATÉPAR Hi hello world! " 
HERR mult, 5) //XH RARE 10 

上 面 是 Groovy 闭 包 的 一 些 简单 的 使 用 片段 

建造 器 (builder) 


建造 右 可 以 用 惊人 简洁 的 语法 构造 出 复杂 的 层级 数据 模 def builder = new 








型 。 其 中 的 秘诀 是 元 编程 groovy.xml.MarkupBuilder (writer) 
builder.html()í( 
head(){ 


title("Welcome"){} 
} 
body () { 
p("How are you?") 
j 
j 


Groovy 建 造 需 的 实现 原理 结合 了 元 编程 和 闭 包 


元 编程 一 一 ExpandoMetaClass 








ExpandoMetaClass 是 Groovy 最 重要 的 元 编程 构造 之 一 ， Integer.metaClass.twice «« [delegate * 2) 
它 允 许 我 们 按照 财 包 的 定义 语法 ,动态 地 添加 方法 、 构 造 “” 这 段 代 码 向 Integez 类 添加 了 一 个 名 为 twice 的 方法 。 新 
ii EMISIA 的 方法 在 不 受 限制 的 作用 域内 对 所 有 的 线程 可 见 
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元 编程 一 一 category 特 性 
category 概 念 的 作用 与 ExpandoMetaclass 类 似 , 但 可 以 class IntegerCategory { 


将 动态 注入 内 容 的 可 见 人 性 限制 在 我 们 明确 指定 的 作用 static Integer twice(Integer i) ( 
域内 return i * 2 





} 

} 

use (IntegerCategory) { 
assert 4 == 2.twice() 


} 
twice 方 法 仅 在 use {} 划 定 的 作用 域内 可 见 


E.2 参考 文献 


[1] König, Dierk, Paul King, Guillaume Laforge, and Jon Skeet, 2009. Groovy in Action, Second Edition. 
Manning Early Access Program Edition. Manning Publications. 

[2] Subramaniam, Venkat. 2008. Programming Groovy: Dynamic Productivity for the Java Developer. 
The Pragmatic Bookshelf. 
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本 篇 附录 将 帮助 你 熟悉 Clojure 语 言 中 有 助 于 DSL 开 发 的 一 些 特性 。 请 不 要 把 本 附录 看 作 一 篇 
细致 而 全 面 的 语言 综述 。 如 果 和 希望 完整 而 详细 地 探讨 Clojure 语 言及 其 语法 ， 可 以 参阅 F.2 市 所 列 


的 文献 资料 。 
F.1 Clojure 语 言 的 DSL 相 关 特 性 


Clojure 是 一 种 植 根 于 VM 的 也 数 式 编程 语言 ,以 通用 编程 语言 为 定位 。 它 属于 动态 类 型 的 语 
言 ， 具 有 类 型 推 半 的 特性 , 还 可 根据 需要 问 编 谋 硕 提供 类 型 提示 (type hint) 以 提高 效率 。Clojure 
是 一 种 Lisp 方 言 ， 直 接 编 译 成 JVM 字 方 码 执行 。Clojure 语 言 具有 同 像 ( homoiconic ) 的 特征 ， 且 
内 建 了 丰富 而 强大 的 并 发 控制 结构 。 

除了 表 F-1 所 列 的 项 目 ，Clojure 还 有 很 多 值得 了 解 的 语言 特性 ， 包 括 并 发 和 状态 管理 方面 的 
特性 、 各 种 组 求 值 序列 (lazy sequence )、 序 列 推导 ( sequence-comprehension ) 和 循环 ， 以 及 众 
多 高 级 数据 结构 。 详 情 可 以 查阅 F2 玉 文献 []。 

表 F-1 Clojure 语 言 特性 汇总 
函数 式 一 一 围绕 函数 来 组 织 DSL 


























str "hello" " " "world") 


我 们 的 整套 DSL 全 部 由 函数 构成 
函数 是 Clojure 首 要 的 语言 构造 。Clojure ae PL s 
的 水 数 支持 高 阶 函 数 和 闭 包 特性 ， 也 支 。”-、 o 
TEES A ERR (+ 12-20) 
Clojure 虽 然 建立 在 Java 之 上 ,但 它 的 函数 
式 特征 完全 占据 主导 地 位 。 尽 管 Clojure ” 曾 爱 请 法 现在 已 经 不 会 让 人 感到 阳 生 
人 允许 我 们 下 降 到 Java 层 面 去 调用 对 象 语 注意 : 
义 ， 但 就 语言 习惯 来 说 ，Clojure 是 函数 ”Clojure 具 有 “ 同 像 (homoiconic ) ”的 性 质 。 函 数 调 用 操作 本 身 也 是 一 个 
式 的 列表 ， 以 函数 的 名 字 作 为 列表 的 第 一 个 元 素 

(filter even? [1 2 3 4]) 

=> (2 4) 


even? 是 一 个 Clojure 国 数 ， 其 作用 是 当 输 入 为 偶数 时 返回 true。 我 们 在 上 
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函数 式 





函数 式 
我 们 通过 defn 宏 来 定义 函数 。 如 右边 的 例子 所 示 ， 其 语 
法 非常 纯粹 。 函 数 本 身 也 是 数据 ,只 不 过 开头 的 位 置 添 加 
了 一 个 有 语义 意义 的 符号 ,这 是 Clojure〈 以 及 其 他 Lisp 变 
体 ) 最 为 引 人 注 目的 特点 





围绕 
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( 续 ) 


函数 来 组 织 DSL 


面 例子 中 将 even? 国 数 作为 参数 之 一 传递 给 filter ， 
filter 会 用 它 来 逐一 沛 选 输入 区 | 表 的 每 一 个 JK 
(filter #(or (zero? (mod % 3)) 
(zero? (mod % 

[1 3 5 7 9 10 15] 
=> (3 5 9 10 15) 


RIE LEE A KAURA filter 


函数 定义 


(defn ^String greet 
"Greet your friend" 
[name] 
(str "hello; " 

函数 定义 以 aeftn 开 头 。 然 后 是 文档 字符 串 〈docstring ) , 

也 就 是 吨 数 的 说 明文 档 。 接 着 是 放 在 一 个 vector 里 的 参数 

列表 。 最 后 是 函数 体 

我 们 可 以 根据 需要 插入 元 数据 ， 元 数据 以 ^ 前 级 开头 。 例 

中 的 ^String 标 明了 男 数 的 返回 类 型 

这 上 段 函 数 定义 本 身 也 是 一 个 Clojure 列 表 结 构 , 定义 的 每 一 

个 构成 部 分 都 是 列表 中 的 元 素 


name)) 




















抽象 设计 
Clojure 方 式 传统 OO 方式 
e FRAI m 数据 都 作为 私有 成 员 隐藏 在 类 中 
m X] An] AE u X] 2 en ABI 


um 由 多 路 方法 ( multimethod ) 和 协议 (protocol) 实现 多 态 
个 存在 实现 继承 


序 
Clojure 语 言 的 任何 一 种 集合 数据 类 型 都 是 一 个 序列 。 我们 
可 以 一 视 同仁 地 对 等 所 有 种 类 的 序列 ， 通 过 相同 的 API 来 
操作 它们 。 男 外 ， 所 有 的 Java 集 合 类 型 都 可 以 当做 Clojure 
序列 来 对 待 ， 如 右边 的 例子 所 示 








四 由 层级 化 的 继承 关系 形成 多 态 ， 继 承 关 系 可 以 是 接口 继 
承 ， 也 可 以 是 实现 继承 

m 允许 实现 继承 

列 

(first '(10, 20, 

=> 10 

(rest [10, 20, 

=> (20, 30) 

(first {:fname 


30)) 
3017 


"rich" :lname "hickey"}) 


=> [:fname "rich"] 

在 这 段 代码 中 : 

晶 第 一 个 例子 在 一 个 List 上 调用 first 
上 第 二 个 例子 在 一 个 vector 上 调用 rest 


卓 第 三 个 例子 在 一 个 Map 上 调用 first 


序列 同时 也 是 函数 


Clojure 把 所 有 的 序列 类 型 部 当成 函数 看 筛 。 这 种 观点 源 目 
序列 的 数学 定义 

Clojure 的 各 种 序列 都 可 以 从 数学 的 角度 去 表述 ,下 面 是 几 
个 例子 : 





(def colors [:red :blue :green]) 
(colors 0) 

=> :red 

(def room (:len 100 :wd 50 :ht 10}) 
( 


room :len) 
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序列 同时 也 是 函数 


四 Vector 是 它 的 位 置 的 函数 => 100 
(def names #{"rich hickey" "martin odersky" 





m Mapi C HUSERS PR "james strachan"]) 
m Set E mm D e AIMER (names "rich hickey") 


=> "rich hickey" 
(names "dennis Ritchie") 


=> nil 
创建 序列 
Clojure 提 供 了 一 系列 的 序列 创建 函数 。 其 中 很 大 一 部 分 天 
数 返回 的 序列 是 绥 求 值 序 列 , 因此 可 以 用 于 创建 无 限 长 的 
序列 


(range 0 10 2) 
=> (0 2 4 6 8) 
(repeat 5 3) 
( 











> (3 3 3 3 3) 
take 10 (iterate inc 1)) 
> (123456789 10) 


对 序列 进行 筛选 
Clojure 为 序列 的 得 选 操作 提供 了 若干 组 合子 。 我 们 应 该 优 ” (filter even? [1 23 4 5 6 7 8 9]) 
先 使 用 这 些 组 合子 ， 尽 量 避 免 程序 中 出 现 显 式 的 递归 | 


( 
(take 10 (filter even? (iterate inc 1))) 
( 





> [2 4.6 8 10 12 14 16 18 20] 
split-at 5 (range 10)) 
> [(0 1 2 3 4) (567 8 9)] 


对 序列 进行 变换 


Clojure 提 供 了 大 量 对 已 存在 序列 进行 变换 操作 的 组 合子 。 (map inc [1 2 3 4]) 


它们 以 一 个 序列 作为 输入 ， 输 出 变换 后 产生 另 一 个 序列 => (0535595 
或 值 (reduce + [12 3 4]) 


=> 10 
数据 结构 的 持久 性 和 不 可 变性 
Clojure 语 言 中 所 有 的 数据 结构 都 具有 不 可 变 (immutable) (def a [1 2 3 41) 
和 持久 ( persistent ) 的 性 质 。 也 就 是 说 ， 即 使 一 个 对 象 发 (def b (conj a 950) 
生 了 改变 ,我 们 仍然 可 以 访问 它 的 所 有 历史 版 本 。 而且 ^ 
Clojure 的 实现 方式 并 不 需要 额外 占用 大 量 的 存储 空间 














> [1 2 3 4] 











> [1 2 3 4 5] 


宏 
Clojure 进 行 DSL 设 计 的 秘诀 是 宏 。 宏 是 一 种 在 宏 展 开 阶段 (defmacro unless [expr form] 
被 展开 替换 为 有 效 Clojure 语 言 成 分 的 程序 结构 。 EPUM Ciis gera s dece 
宏 是 我 们 为 DSL 量 身 定做 各 种 语法 结构 的 利器 我 们 在 这 个 安里 定义 了 一 种 类 似 于 if 和 while 的 控制 结 
构 。 它 在 使 用 的 时 候 和 一 般 的 Clojure 语 言 成 分 并 没有 什么 
两 样 


F.2 参考 文献 


[1] Halloway, Stuart. 2009. Programming Clojure. The Pragmatic Bookshelf. 
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通读 全 书 ， 你 会 产生 一 个 印象 : DSL 不 必 总 用 一 种 语言 来 编 与 ， 我 们 可 以 根据 需求 来 选择 
最 适合 的 语言 。 然 而 当 各 种 语言 不 加 选择 地 次 在 一 起 ， 互 相 格格 不 和 时， 语言 间 的 摩 探 又 可 能 
令 我 们 的 应 用 成 为 灾难 的 现场 。 当 然 ， 这 种 情形 是 可 以 避 锡 的。 那么 ， 如 何 判断 目 己 的 项 目 是 
MA S AA PRANE? (RBS! 当 你 真正 遇 到 圭 言 冲突 时 ， 上 朋 定 会 像 图 G-1 的 程序 员 那 
EREK] o 
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Clojure 


? 


? 
多 语言 主义 !!| 
图 G-1 别 让 自己 落 到 这 个 地 步 


本 篇 附录 的 作用 是 引导 读者 搭建 一 个 有 序 的 多 语言 开发 环境 。 如 果 我 们 希望 在 JVM 上 开发 
DSL 应 用 ,那么 此 时 Java 语 言 将 在 开发 中 扮演 基本 宿主 语言 的 角色 。 应 用 的 主体 部 分 使 用 Java 语 
言 ，DSL 的 部 分 则 选择 其 他 声言 ， 从 而 满足 目标 客户 对 于 API 表 现 力 的 有 要求 。 在 此 有 个 小 小 的 提 
醒 一 一 本 篇 附录 是 为 初 涉 多 语言 范式 下 DSL 开 发 的 谈 者 准备 的 , 已 经 有 过 相关 经 验 的 开发 者 完全 
可 以 忽略 。 

我 们 会 用 两 个 例子 来 说 明 开 发 环境 的 搭建 方法 ， 例 中 将 按照 我 们 的 设想 ， 使 用 Java 以 外 的 
JVM 语 言 来 开发 DSL， 然 后 将 之 集成 到 基于 Java 的 应 用 主体 。 第 一 个 例子 针对 动态 类 型 语言 
Groovy， 主 要 展示 Java 和 Groovy 语 言 的 混合 项 目 在 现代 IDE 里 天 衣 无 颖 的 集成 效果 。 第 二 个 例子 
针对 静态 类 型 语言 Scala， 讲 解 Java 和 Scala 混 合 项 目的 开发 环境 配置 。 
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G.1 对 IDE 的 特性 要 来 


就 JVM 平 台 上 的 多 语言 项 目 来 说 ,我 们 希望 IDE 具 备 以 下 特性 。 
O 支持 Java 与 男 一 种 JVMi 语 言 ， 如 Scala、Groovy、Ruby 或 Clojure 的 混合 项 日 ， 以 及 相应 的 
项 目 依 赖 项 。 
O IDE 所 含 编 辑 硕 应 该 具备 丰 宇 的 语法 功能 ， 可 以 为 开发 者 提供 一 定 程度 的 协助 。 所 谓 “ 丰 
军 ”， 指 的 是 编辑 硕 具 备 霹 法 高 完 、 类 型 推 上 新、 鼠标 文档 提示 、 代 码 补 全 等 类 似 功 能 。 
口 可 以 在 统一 视图 下 浏览 所 有 的 项 目 部 件 ， 包 括 用 不 同 语 言 编 写 的 类 型 、 包 、 视 图 等 。 
口 集成 了 相关 语言 的 调试 能 
除 此 之 外 ,不 同 的 语言 还 可 能 要 求 一 些 其 他 的 特性 。 静 态 类 型 语言 的 IDE 文 持 一 般 要 比 动态 
语言 的 好 一 些 ， 因 为 静态 类 型 的 程序 含有 较 多 的 元 信息 。 当 前 IDE 的 发 展 日 新 月 异 ， 众 多 流行 的 
IDE 都 在 尽力 从 使 用 者 的 角度 去 提升 功能 ， 和 希望 开发 者 获得 更 舒适 的 使 用 感受 。 















































G.2 ”搭建 Java 和 Groovy 的 混合 开发 环境 


真正 从 事 过 Java 项 目 开 发 的 人 肯定 都 有 使 用 Eclipse ( http://eclipse.org ) 、NetBeans 
( http://netbeans.org ) 等 现代 IDE 的 经 验 。 当 我 们 步 和 多 声言 DSL 开 发 领域 时 ， 目 然 会 希望 所 使 用 
的 IDE 能 够 为 项 目的 操作 和 构建 提供 水 平 相当 的 文 持 。 当 前 这 方面 的 进展 极为 迅速 ， 读 者 可 以 关 
注 相 关 开 发 平 合 的 更 新 消息 。 

Groovy 与 Java 的 集成 关系 非常 融洽。 我 们 在 第 3 草 提 到 过 ，Groovy 共 至 了 Java 的 对 象 模 型 ， 
此 任何 适合 Java 项 目的 IDE 至 少 能 够 为 Groovy 项 目 提 供水 平 相 当 的 支持 。 不 过 这 里 面 有 一 个 隐 星 
的 缺陷 。Groovy 是 一 种 动态 语言 ， 不 刻意 要 求 指明 类 型 ， 所 以 很 多 时 候 IDE 无 法 得 知 运行 时 才能 
确定 的 类 型 信息 。 于 是 像 代码 补 全 之 类 的 高 级 编辑 特性 , 在 过 到 Groovy 代 人 码 时 就 不 一 定 能 很 好 地 
发 挥 作用 。 即 便 有 这 样 理论 上 的 弱点 ， 我 们 还 是 可 以 看 到 这 个 领域 的 持续 进步 。 众 多 能 够 执行 各 
式 和 贸 能 操作 的 编 府 带 插件 被 发 明 出 来 ， 就 连 动态 语言 也 不 例外 。 

请 读者 按照 表 G-1 的 建议 配置 Java 项 目下 的 Groovy DSL 开 发 环境 。 

表 G-1 搭建 Groovy DSL 开 发 环境 的 步骤 
步 又 用 途 
下 载 Java Development Kit (Java 5 以 上 版 本 ) ”除了 用 于 常规 的 Java 开 发 ，Groovy 开 发 也 需要 Java 运 行 时 


下 载 NetBeans IDE ( 最 新 版 本 ) ; 具体 的 版 本 兼 ”这 个 IDE 负 责 管 理 我 们 的 Java 和 Groovy 项 目 
容 信息 请 查阅 http:/netbeans.org 网 站 上 的 文档 


在 NetBeans 菜 单 里 选择 创建 普通 的 Java 应 用 我 们 将 要 创建 的 Java 和 Groovy 源 文件 都 归属 于 这 个 应 用 


给 项 目 命名 , 然后 开始 创建 Java 和 Groovy 源 文件 。” IDE 会 在 统一 的 视图 下 管理 项 目 中 的 Java 和 Groovy 部 件 。Groovy DSL 
脚本 和 Java 源 文件 都 被 放置 在 我 们 设 定 的 包 结构 之 中 。 不 需要 任何 额 
外 的 插件 ，Netbeans 就 能 顺利 构建 这 样 的 项 目 。 采 用 第 2 章 、 第 3 章 、 
第 4 章 里 讨论 的 任意 一 种 方法 ， 我 们 都 可 以 轻松 地 在 Java 类 里 调用 写 
好 的 DSL 脚 本 
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G.3 ”搭建 Java 和 Scala 的 混合 开发 环境 


众所周知 Scala 是 一 种 拥有 强大 类 型 系统 的 静态 类 型 语言 。 针 对 Scala 语 言 的 IDE 文 持 也 正在 持 
续 地 发 展 进步 ， 其 中 Eclipse、Intellij Idea 和 NetBeans 已 具备 相当 优秀 的 Scala 代 码 编辑 能 力 。 

在 Eclipse 上 添加 Scala 语 言 文 持 非常 简单 , 只 要 安 痛 最 新 版 本 的 插件 就 可 以 了 。 照 看 下 面 的 完 
整 配置 步 又 做 ， 束 能 配置 好 一 个 文 持 Java 和 Scala 混 合 开发 的 Eclipse 环境 。 

首先 需要 准备 以 下 软件 : 

Q Java Development Kit 6; 

O Eclipse Classic ( 确切 版 本 请 查阅 http://eclipse.org )。 

安装 好 Eclipse 后 ， 就 可 以 开始 安装 Scala 语 言 插件 了 了。 插件 所 在 的 Scala IDE 网 站 
( http://www.scala-ide.org/ ) 的 主页 上 有 一 段 视频 ， 演示 了 安装 所 害 的 详细 步骤 。 

Scala 语 言 的 Eclipse 插 件 每 天 都 在 改进 。 插 件 为 我 们 的 Scala/Java 混 合 开发 工作 提供 了 大 量 的 














口 文 持 Scala 和 Java 的 混合 项 目 ; 

口 文 持 代码 补 全 、 类 型 推 新 等 功能 的 高 级 编辑 带 ; 

O 增 量 编译 ; 

a 39s 

口 以 及 这 里 无 法 一 一 提 及 的 、 专 为 各 种 Scala 和 Java 制 品 而 准备 的 诸多 功能 。 


G.4 弟 见 的 多 语言 开发 IDE 


表 G-2 列 出 了 一 些 和 常见 的 、 适 合 多 语言 开发 的 IDE。 此 外 ,还 列 出 了 每 一 种 IDE 所 支持 的 常用 
语言 以 及 相应 的 霹 言 文 持 插件 。 














表 G-2 适合 多 语言 开发 的 IDE 
IDE 文 持 插件 
Eclipse ( http://eclipse.org ) 各 语言 的 文 持 插件 : 
m Groovy ( http://groovy.codehaus.org/Eclipse+Plugin ) 
m Ruby 
m Scala ( http://scala-ide.org ) 
m Clojure ( http:;//code.google.com/p/counterclockwise/ ) ) 
NetBeans ( http://netbeans.org ) 各 语言 的 文 持 插件 : 
m Ruby ( http:;//netbeans.org/projects/ruby/ ) 
m Clojure ( http://www.enclojure.org ) 
m Scala ( http:;//wiki.netbeans.org/Scala ) 
m 内 建文 持 Groovy， 无 需 插 件 
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IDE 支持 插件 
Emacs Emacs 支 持 的 JVM 语 言 很 多 ， 其 中 Clojure 是 最 对 它 脾 气 的 。Emacs 可 以 说 是 
( http://www.gnu.org/software/emacs/ ) 编辑 Clojure 代 码 的 首选 。 不 过 有 一 点 需要 提醒 : 没有 用 惯 Emacs 的 开发 者 必 
须 花 一 点 时 间 才 能 适应 它 的 各 种 模式 ( mode ) 。 如 果 你 打算 尝试 Emacs 和 
Clojure 的 组 合 , 可 以 先 从 http://www.assembla.com/wiki/show/ clojure/Getting - 
Star ted with Emacs 入 手 


IntelliJ IDEA ( Text to be displayed 各 语言 的 支持 插件 : 
http://www.jetbrains.com/idea/ ) 











m Groovy (http:/www.jetbrains.com/idea/features/groovy grails.html ) 
m Ruby ( http://www.jetbrains.com/idea/features/ruby rails.html ) 


m Scala ( http;//confluence.jetbrains.net/display/SC A/Scala-*Plugin--for-IntelliJ-- 
IDEA ) 


m Clojure ( http://www.assembla.com/wiki/show/clojure/Getting Started - 
with Idea and La Clojure ) 





当前 IDE 领 域 的 发 展 十 分 活跃 ， 不 断 增 加 的 新 特性 令 它们 的 功能 越 来 越 丰 亩 和 完善 。 因 此 我 
们 在 选择 IDE 的 时 候 ， 最 好 还 是 和 完 到 相关 的 网 站 上 做 做 功 膏 再 下 决定 。 
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